ShowMessage('查询记录数是:'+IntToStr(Query1.RecordCount));
解决方案 »
- 求一个PHP 写的WEB服务器端,delphi客户端的验证系统源码
- 谁有delphi MQ开发接口,那里能下载到IBM MQ软件?
- 关于多线程读文件问题。
- 在窗口中如何能引用到DataMould中的数据源和表啊?
- 控制记录移动问题,搞了好久也没做出来。。
- 关于多次INSERT的效率问题,请进来看看!
- 用TIDDUPServer发送数据给断开的客户端后不能在接收数据,这是为什么?怎么解决?谢了!
- 问:做一个组件,如何让属性在属性编辑器中有一个自设定的默认值?
- 关于delphi编写DLL的string、PChar的赋值问题:
- RAD Studio 10.2如何从项目文件生成UML类图?
- 请问如何将DBGird的内容放到QReport中并可以打印和预览?
- 提问:如何在cooltrackbar里面加入鼠标的滚轮事件就是让鼠标的滚轮控制上下??????????????????????????
Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add('SELECT * from 入库单表');
Query1.Sql.Add('where 产品名称<>''''');
if ylksubfind.Edit1.Text<>'' then
Query1.Sql.Add('And 产品名称='''+ylksubfind.Edit1.Text+'''');
ShowMessage('查询记录数是:'+IntToStr(Query1.RecordCount));
Query1.Open;
Query1.Sql.Clear;
Query1.Sql.Add('SELECT * from 入库单表');
Query1.Sql.Add('where 产品名称<>''''');
if ylksubfind.Edit1.Text<>'' then
Query1.Sql.Add('And 产品名称='''+ylksubfind.Edit1.Text+'''');
Query1.Open;
ShowMessage('查询记录数是:'+IntToStr(Query1.RecordCount));先OPen~~取得数据~~才可以在察看记录数的~~