[Yasha]

Доброе время суток.
Никак не могу понять, как написать SQL команду на добавление данных в бд из String Grid.
Делаю так:

Код:

for Row := StringGrid1.RowCount - 1 downto StringGrid1.FixedRows
 do for Col := StringGrid1.FixedCols to StringGrid1.ColCount - 1
                do begin

S:=StringGrid1.Cells[Col,1];  //Это от безысходности
DataModule3.ADOQuery1.Active:=false;
DataModule3.ADOQuery1.SQL.Text:='INSERT INTO org (num, okpo, inn, org, main, fio, index, okato, adress) VALUES ('+S+')';
DataModule3.ADOQuery1.Active:=true;
end;
end;

Админ: Пользуемся тегами для оформления кода!

Посоветуйте, как правильней сделать.