L
li_yu
Unregistered / Unconfirmed
GUEST, unregistred user!
我写了以下代码，想把输入edit1.text的值插入到aa.dbf
procedure TForm1.Button1Click(Sender: TObject);
var
kkkk:string;
begin
kkkk:=edit2.text;
with query1 do
begin
close;
sql.clear;
sql.add('insert into aa(xm,xb,zc) values(kkkk,"1","2")');
ExecSQL;
end;
end;
可是sql.add()语句错误，请高手指教，怎样实现以上功能。
procedure TForm1.Button1Click(Sender: TObject);
var
kkkk:string;
begin
kkkk:=edit2.text;
with query1 do
begin
close;
sql.clear;
sql.add('insert into aa(xm,xb,zc) values(kkkk,"1","2")');
ExecSQL;
end;
end;
可是sql.add()语句错误，请高手指教，怎样实现以上功能。