知识大全进销存管理系统资料管理功能的实现（二）[1]

Posted 2022-07-21 拼音

篇首语：种子牢记着雨滴献身的叮嘱，增强了冒尖的勇气。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全进销存管理系统资料管理功能的实现（二）[1]相关的知识，希望对你有一定的参考价值。

——此文章摘自《Delphi 数据库开发经典案例解析》定价￥　特价￥　购买>>//track linktech cn/?m_id=dangdang&a_id=A &l= &l_type = width= height= border= nosave>

双击图所示界面中的【查询】按钮为按钮添加下面的事件处理程序实现对所使用的数据表的动态判断和模糊查询整个信息管理窗体的代码如下 // 单击商品信息管理菜单显示商品清单 procedure TInfo N Click(Sender: TObject); begin //查询商品信息 adoquery Close; adoquery SQL Clear; adoquery SQL Text:= select * from 商品清单 ; adoquery Open; //设置列的宽度方便用户查看 dbgrid Columns[ ] Width:= ; dbgrid Columns[ ] Width:= ; dbgrid Columns[ ] Width:= ; dbgrid Columns[ ] Width:= ; //提示用户输入商品拼音以供查询 label Caption:= 商品拼音 ; end; // 单击供货商信息管理菜单显示供货商清单 procedure TInfo N Click(Sender: TObject); begin //查询供货商信息 adoquery Close; adoquery SQL Clear; adoquery SQL Text:= select * from 供货商清单 ; adoquery Open; //设置列的宽度方便用户查看 dbgrid Columns[ ] Width:= ; dbgrid Columns[ ] Width:= ; dbgrid Columns[ ] Width:= ; dbgrid Columns[ ] Width:= ; //提示用户输入供货商拼音以供查询 label Caption:= 供货商拼音 ; end; // 单击客户信息管理菜单显示客户清单 procedure TInfo N Click(Sender: TObject); begin //查询客户信息 adoquery Close; adoquery SQL Clear; adoquery SQL Text:= select * from 客户清单 ; adoquery Open; //设置列的宽度方便用户查看 dbgrid Columns[ ] Width:= ; dbgrid Columns[ ] Width:= ; dbgrid Columns[ ] Width:= ; dbgrid Columns[ ] Width:= ; dbgrid Columns[ ] Width:= ; //提示用户输入客户拼音以供查询 label Caption:= 客户拼音 ; end;

cha138/Article/program/Delphi/201311/24966

知识大全 进销存管理系统资料管理功能的实现（二）[1]

知识大全进销存管理系统资料管理功能的实现（二）[1]