[Вовайн]

код конпки

Код:

procedure TForm10.Button1Click(Sender: TObject);
var
str:string;
begin
str:='insert into заказы ([Название],[Цена]) values ('+
                      dbgrd1.Columns[1].ToString +',"'+
                      dbgrd1.Columns[5].Tostring +')';
                      showmessage(dbgrd1.Fields[1].value);
                      showmessage(dbgrd1.Fields[5].value);
form69.ADOQuery1.SQL.Add(str);
form69.ADOQuery1.ExecSQL;

form69.ADOTable1.Active:=true;

form69.ADOTable1.Requery;
form69.DBGrid1.Refresh;
end;

MAD: Предупреждение! Оформляйте код правильно.

база acsess там создана пустая таблица заказы с полями название и цена.