delphi7中用adotable,datasourcr,dbgrid,edit,button连接到access数据库做一个查询的表
delphi7中用adotable,datasourcr,dbgrid,edit,button实现在edit中输入数据点击button实现dbgrid中显示按条件搜索出的...
delphi7中用adotable,datasourcr,dbgrid,edit,button实现在edit中输入数据点击button实现dbgrid中显示按条件搜索出的内容
展开
展开全部
adoconnection设老棚拍置connectstring属性,连接数据库, loginprompt设为false, active设为true
adotable connection属性设为 adoconnection1, table name 设为你数据库中的表,active 设和弊为true
datasource 的dataset 属性设为 adotable1
dbgrid 的datasource设为 datasource1
button click 事件写侍羡
procedure TForm1.Button1Click(Sender: TObject);
begin
adotable1.filtered := false;
adotable1.filter := '字段1 = ' + edit1.text;
if trim(edit1.text) <> '' then
adotable1.filtered := true;
end;
adotable connection属性设为 adoconnection1, table name 设为你数据库中的表,active 设和弊为true
datasource 的dataset 属性设为 adotable1
dbgrid 的datasource设为 datasource1
button click 事件写侍羡
procedure TForm1.Button1Click(Sender: TObject);
begin
adotable1.filtered := false;
adotable1.filter := '字段1 = ' + edit1.text;
if trim(edit1.text) <> '' then
adotable1.filtered := true;
end;
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询