用Param参数就不必管用户输入的信息是否有引号。
例如:
Query1.SQL := 'Select * from Customer where Company like :Company'procedure TForm1.Button1Click(Sender: TObject);
begin
Query1.Close;
Query1.ParamByName('Company').AsString := '%' + Edit1.Text + '%';
Query1.Open;
end;
例如:
Query1.SQL := 'Select * from Customer where Company like :Company'procedure TForm1.Button1Click(Sender: TObject);
begin
Query1.Close;
Query1.ParamByName('Company').AsString := '%' + Edit1.Text + '%';
Query1.Open;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货