var s:string; begin with dm.query1 do begin s:='%'+edit1.text+'%'; close; sql.clear; sql.add('select * from dangan where tu like '''+s+''''); open; end;
var s:string; begin with dm.adoquery1 do begin s:='%'+edit1.text+'%'; close; sql.clear; sql.add('select * from dangan where tu like '''+s+''''); open; end
var sqlstr:string; begin sqlstr:='select * from dangan where tu like '+''''+'%' +trim(edit1.text)+'%'+''''; with dm.adoquery1 do begin close; sql.clear; sql.add(sqlstr); open; end end;
我这种方法100%好使,哈哈没问题,快给分! with dm.ADOQuery do begin close; sql.Clear; sql.Add('select * from employee where empname like :empname1'); parameters.ParamValues['empname1']:='%'+trim(Edit1.text)+'%'; open; end;
s:string;
begin
with dm.query1 do begin
s:='%'+edit1.text+'%';
close;
sql.clear;
sql.add('select * from dangan where tu like '''+s+'''');
open;
end;
adoquery.Locate('双酚','tu',[loCaseInsensitive])
var
s:string;
begin
with dm.adoquery1 do begin
s:='%'+edit1.text+'%';
close;
sql.clear;
sql.add('select * from dangan where tu like '''+s+'''');
open;
end
sqlstr:string;
begin
sqlstr:='select * from dangan where tu like '+''''+'%'
+trim(edit1.text)+'%'+'''';
with dm.adoquery1 do
begin
close;
sql.clear;
sql.add(sqlstr);
open;
end
end;
with dm.ADOQuery do
begin
close;
sql.Clear;
sql.Add('select * from employee where empname like :empname1');
parameters.ParamValues['empname1']:='%'+trim(Edit1.text)+'%';
open;
end;