C
clyqhx
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm2.Button1Click(Sender: TObject);
var str1,str2,str3:string;
begin
str1:=edit1.text;
str2:=edit2.text;
str3:=edit3.text;
with query1 do
begin
close;
sql.Clear;
sql.add('insert into mydb(name,address,phone) values(str1,str2,str3)');
execsql;
end;
end;
var str1,str2,str3:string;
begin
str1:=edit1.text;
str2:=edit2.text;
str3:=edit3.text;
with query1 do
begin
close;
sql.Clear;
sql.add('insert into mydb(name,address,phone) values(str1,str2,str3)');
execsql;
end;
end;