直接用SQL语句实现。
添加:
with qryORA do
begin
SQL.Clear;
SQL.Add('INSERT INTO SOMETALBE(FIELD1,FIELD2) VALUES(VALUE1,VALUE2)');
ExecSQL;
end;
修改:
with qryORA do
begin
SQL.Clear;
SQL.Add('UPDATE SOMETALBE SET FIELD1=VALUE1 WHERE FIELD2=VALUE2');
ExecSQL;
end;
删除:
with qryORA do
begin
SQL.Clear;
SQL.Add('DELETE FROM SOMETALBE WHERE FIELD2=VALUE2');
ExecSQL;
end;