使用ADOQuery insert into tablename(aField,bField,cField,....) values(:aa,:bb,cc:...) with AdoQuery1 do close paramByname('aa').asString:=trim(Edit1.text); .... ExecSql; .........................
非常简单啦, button1click1中: with adotable1 do begin append; end; button2click中: with adotable1 do begin post; end;
insert into tablename(aField,bField,cField,....) values(:aa,:bb,cc:...)
with AdoQuery1 do
close
paramByname('aa').asString:=trim(Edit1.text);
....
ExecSql;
.........................
button1click1中:
with adotable1 do
begin
append;
end;
button2click中:
with adotable1 do
begin
post;
end;