delphi 模糊查询
procedureTForm5.Button1Click(Sender:TObject);varedit,idx:string;beginidx:=combobox2.I...
procedure TForm5.Button1Click(Sender: TObject);
var
edit,idx:string;
begin
idx:=combobox2.Items[combobox1.ItemIndex];
edit:=Trim(Edit1.Text);
default.Form1.ADOQuery3.SQL.Clear;
showMessage(default.Form1.ADOQuery3.SQL.Text);
showMessage(edit);
showMessage(idx);
default.Form1.ADOQuery3.SQL.Text:='select * from addr_d where '+idx+' like ''%'+edit+'% ''';
showMessage(default.Form1.ADOQuery3.SQL.Text);
default.Form1.ADOQuery3.Open;
end;
没有显示认识信息 展开
var
edit,idx:string;
begin
idx:=combobox2.Items[combobox1.ItemIndex];
edit:=Trim(Edit1.Text);
default.Form1.ADOQuery3.SQL.Clear;
showMessage(default.Form1.ADOQuery3.SQL.Text);
showMessage(edit);
showMessage(idx);
default.Form1.ADOQuery3.SQL.Text:='select * from addr_d where '+idx+' like ''%'+edit+'% ''';
showMessage(default.Form1.ADOQuery3.SQL.Text);
default.Form1.ADOQuery3.Open;
end;
没有显示认识信息 展开
展开全部
你想看到查询结果是吧？
需要放进来一个TDBGrid和一个TDataSource
将TDBGrid的DataSource设置成TDataSource
将TDataSource的DataSet设置成ADOQuery3
这些都可以通过可视化的设置，不需要写代码。
是这个意思么....
需要放进来一个TDBGrid和一个TDataSource
将TDBGrid的DataSource设置成TDataSource
将TDataSource的DataSet设置成ADOQuery3
这些都可以通过可视化的设置，不需要写代码。
是这个意思么....
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
