Code: Select all
var OraSQL : TOraSQL;
.........
OraSQL.SQL.Add ('insert into test (a, b, c) values (:a, :b, :c)');
OraSQL.ParamByName ('a').AsString := '111';
OraSQL.ParamByName ('b').AsInteger := 222;
OraSQL.ParamByName ('c').AsString := '333';
OraSQL.Execute;
.......
Code: Select all
create table test (
a Varchar2 (10),
b Number (10),
c Varchar2 (10)
);