query2.close;
   query2.SQL.Clear;
   query2.SQL.Add(' 
ALTER table bmm add A5 char(30);
ALTER table bmm add A6 char(30);
ALTER table bmm add A7 char(30);
ALTER table bmm add A8 char(30);
ALTER table bmm add A9 char(30);
ALTER table bmm add A10 char(30);
ALTER table bmm add A11 char(30);
ALTER table bmm add A12 char(30);')
query2.ExecSQL;