with adoquery1 do begin active:=fasle; sql.clear; sql.Add('update yunjia set 车辆类型='''+flatedit3.Text+''',最小运距=:param2,最大运距=:param3,运价=:param4 where num=:param1'); Parameters[0].Value :=strtoint(flatedit1.Text); //parma2 Parameters[1].Value :=strtoint(flatedit2.Text);//parma3 Parameters[2].Value :=strtoint(flatedit4.Text);//parma3 execute; active:=True; end;
Parameters.Parambyname['']
begin
active:=fasle;
sql.clear;
sql.Add('update yunjia set 车辆类型='''+flatedit3.Text+''',最小运距=:param2,最大运距=:param3,运价=:param4 where num=:param1'); Parameters[0].Value :=strtoint(flatedit1.Text); //parma2
Parameters[1].Value :=strtoint(flatedit2.Text);//parma3
Parameters[2].Value :=strtoint(flatedit4.Text);//parma3
execute;
active:=True;
end;