Добавление в sql-БД

[Prisian]

Попробуй без SQL-запроса. Вот код:


var
f1,f2:integer;
BEGIN
if not Table1.Locate(Field1;Field2,loCasei nsesitive) then
begin
f1:=sTRtoInt(Edit1.Text);
f2:=StrToInt(Edit2.Text);
Table1.InsertRecord(f1,f2);
end
else
Begin
f1:=StrToInt(Edit1.text);
f2:=StrToInt(Edit2.text);
Table1.SetFields(f1,f2);
end;
end.

должно работать.