Ded wrote:
    Ты неправильно делаешь. Надо так:

Try Insert;
 Except ;
end;

Млин, точно.
function TFIBDatabase.Execute(const SQL: string): boolean;
begin
 try
  QueryValue(SQL,-1);
  Result:= True
 except
  Result := False;
 end;
end;

Ответить