Delphi如何根据选择的下拉菜单不一样,而读取SQL数据库相应的记录
???Delphi如何根据选择的下拉菜单不一样,而读取SQL数据库相应的记录???
我用Delphi创新了一个窗口,窗口里放了Edit和ComboBox组件,我如何根据选择ComboBox组件下面的选项不一样,而使Edit组件显示数据库中对应的不同记录呢?
具体:我的系统是仓库出入库管理的,SQL数据库的那个表名为:“商品入库信息表”,里面有字段分别为:“入库编
号”、“商品名称”、“商品产地”;
窗口上的ComboBox组件取名为:Comb_rkbh(即入库编号),Edit分别为:Edt_spmc(商品名称)、Edt_spcd(商品产
地);
而Comb_rkbh我获取到了“商品入库信息表”的“入库编号”,怎样根据选择的入库编号不一样,而使得Edt_spmc和Edt_spcd
读到数据表中相应的某一条数据记录呢?
[解决办法]
Comb_rkbh的OnChange事件中:
AdoQuery.Close;
AdoQuery.SQL.Clear;
AdoQuery.SQL.Text := 'select 商品名称, 商品产地 from 商品入库信息表 where 入库编号 = ' + QuotedStr(Comb_rkbh.Text);
AdoQuery.Open;
if AdoQuery.RecordCount > 0 then
begin
Edt_spcm.Text := AdoQuery.FieldByName('商品名称').AsString;
Edt_spcd.Text := AdoQuery.FieldByName('商品产地').AsString;
end;
[解决办法]
是呀,,,像楼上的在SQL语句中加个你选择的条件就可以了呀。。