摘要: 先看效果图 效果要求: 1.点击申领数量时,自动设置此物料可领上限,与可退的下限 2.申领数量为0时,不更新 说明: 1.使用了cxGrid+FireDAC 2.TFDQuery控件不要开快储功能(CachedUpdates不要勾选) 3.因为表格数据为多表联合查询的数据,所以这里要设置一下更新指向 阅读全文
posted @ 2023-02-12 17:08 一曲轻扬 阅读(246) 评论(0) 推荐(0) 编辑
摘要: 简单的设计一下界面,大致如下: 要求:审核或者反审核用户选择的数据 1.正常点审核时,审核=true,审核人=当前用户名 2.反审核时,审核=false,审核人=null 实现代码: procedure TForm1.UpdateData(flg: Boolean); var i, n, Error 阅读全文
posted @ 2023-02-10 10:03 一曲轻扬 阅读(690) 评论(0) 推荐(2) 编辑
摘要: 今天遇到个问题, 设计时,[审核人] 字段是有数据的 数据库里的 [审核人]字段 也是有数据的 但是偏偏运行时没有数据 首先排除字段绑定问题,因为设计阶段是有数据的,然后仔细检查create事件,发现里面有设置默认值操作,怀疑这些操作触动了查询操作,然后查询函数中打断点,一步步跟进.最后发现是查询函 阅读全文
posted @ 2023-02-09 10:44 一曲轻扬 阅读(102) 评论(0) 推荐(0) 编辑
摘要: 宏参数 & 第一步: 我们先在TFDQuery组件中写个SQL模板,内容为(不要点[执行]或者active,不会成功的): SELECT &Fields FROM &Table &WhereWords 上面一共使用了三个宏参数,它们分别表示 字段(s),表名,以及条件语句.TFDQuery组件下的M 阅读全文
posted @ 2023-02-07 15:49 一曲轻扬 阅读(282) 评论(0) 推荐(0) 编辑
摘要: 以下内容均摘转载于 【麦麦提敏】 :https://www.cnblogs.com/karkash/ 第一章 FireDAC 数据库开发笔记 开发数据库应用应用程序 第二章 FireDAC 数据库开发笔记 快储机制 第三章 FireDAC 数据库开发笔记 使用内存数据组件 FDMemTable 第四 阅读全文
posted @ 2023-02-06 18:30 一曲轻扬 阅读(317) 评论(0) 推荐(1) 编辑
摘要: 需求: 窗体上下两个表,上面是主表,下面是从表. 当点击主表上的记录时,从表显示出此物料的入仓记录 效果如下图所示 操作步骤: 正常设置 主表+DS主表, 从表+DS从表 主表 然后是设置 从表 然后我们必须要理解的是: 从表 的数据应该是根据 主表 选择的记录来进行筛选的 但是 主表 里面那么多字 阅读全文
posted @ 2023-01-31 19:08 一曲轻扬 阅读(411) 评论(0) 推荐(0) 编辑
摘要: 当一个项目从一台电脑转移到另一台电脑时,经常出现各种各样的问题,让人非常苦恼.而IDE给出的错误提示也非常有限,让我这个小白总是花费很多的时间去寻找解决方案(百度,找大神,群里问),真是在累了.写下这篇文章,希望用我的亲身经历来告诉大家应该怎么处理.有说得不对,做的不好的地方,欢迎斧正,感谢! 起因 阅读全文
posted @ 2023-01-29 19:51 一曲轻扬 阅读(349) 评论(0) 推荐(0) 编辑
摘要: uses Vcl.OleAuto procedure T供应商管理.dxBarLargeButton3Click(Sender: TObject); var SaveDialog: TSaveDialog; path: string; //路径信息 ExcelAPP: Variant;//变体变量 阅读全文
posted @ 2023-01-28 16:08 一曲轻扬 阅读(386) 评论(0) 推荐(0) 编辑
摘要: 百度这个标题,出来N多结果,但是每一种都有问题 方法1: 下面这种方法基本还行,但是会漏字,什么意思呢,比如 东莞深圳,它只返回DS ,莞和圳都被吃掉了. https://www.shuzhiduo.com/A/A7zg3XrKz4/ //取汉字的拼音首字母 function GetHzPy(AHz 阅读全文
posted @ 2023-01-28 14:28 一曲轻扬 阅读(211) 评论(0) 推荐(0) 编辑
摘要: 主从表的问题. 效果图大概如下图所示,它能体现出主表里每一条记录的入仓记录,左边的加减号可以展示与隐藏从表. 结构设计如上图右下角所示,做两个level,和两个DB table,从结构上可以很晰的看到,TV报废池是主表,TV查询是从表. 我们需要做两组数据集,SQL内容按业务自己看着写. 然后是主从 阅读全文
posted @ 2023-01-18 15:12 一曲轻扬 阅读(464) 评论(0) 推荐(0) 编辑
摘要: 我写的博客内容,都是在实际生产中遇到的问题,针对性很强,记录下来有两个目的,一是当成笔记,二是丰富Delphi的网上资料,让遇到相同问题的朋友,少走弯路. 如下图,我希望所属仓库,供应商,物料用途这三个字段,我希望做成下拉菜单的形式给用户选择, 但因为这个表格是多表联合查询得出来的结果,如果直接交给 阅读全文
posted @ 2023-01-16 12:53 一曲轻扬 阅读(859) 评论(0) 推荐(0) 编辑
摘要: 需求环境: 1.用户登陆成功后,我用一个记录类型TUser,来记录用户相关的一个信息,其中包括一些权限,这部分内容大概有几十个之多. 这里我们先不讨论这种方案的优劣,只谈实现方法 2.现在设定:当用户想要点开某一个模块时,需要先要在TUser里面查询用户是否有权限打开这个模块.因为权限太多了,不可能 阅读全文
posted @ 2023-01-06 19:36 一曲轻扬 阅读(331) 评论(0) 推荐(0) 编辑
摘要: 窗体A引用了含有cxgrid控件的Frame. 在frame里面写cxgrid的单元格双击事件时,一点问题都没有.但是如果想在窗体A里面去写Frame中cxgrid单元格的双击事件时,就会出现参数类型不识别的现象: 产生这种现象的原因是因为窗体A没有uses到cxgrid必须的单元,这里需要特别说明 阅读全文
posted @ 2023-01-04 08:46 一曲轻扬 阅读(245) 评论(0) 推荐(0) 编辑
摘要: 问题表现为: 手动设置里一点问题也没有,值和颜色都能正常显示,但是通过代码操作时,onchange事件并没有被触发. 解决方案是让它主动触发: ComArr是个全局TList,窗体创建时,把这9个COMBOBOX加到里面去了.下面这段代码是用来'移动'色块的. procedure TForm1.Mo 阅读全文
posted @ 2023-01-01 20:35 一曲轻扬 阅读(389) 评论(0) 推荐(0) 编辑
摘要: 效果图: type TFrame2 = class(TFrame) Panel1: TPanel; TV: TcxGridDBTableView; cxGrid1Level1: TcxGridLevel; cxGrid1: TcxGrid; TVColumnName: TcxGridDBColumn 阅读全文
posted @ 2022-12-26 17:04 一曲轻扬 阅读(291) 评论(0) 推荐(0) 编辑
摘要: 1.被TActionList指派了命令的按钮,运行时被隐藏 我有个frame,里面有一批按钮默认visible设置false 然后在调用时,按实际需要,显示出需要的按钮 然后我又加入了一个ActionList控件 ,然后问题就来了....当按钮被ActionList指派命令,程序在运行时,所有被指派 阅读全文
posted @ 2022-12-20 19:52 一曲轻扬 阅读(294) 评论(0) 推荐(0) 编辑
摘要: 这本书可以在 Delphi研习社②群 256456744 的群文件里找到. 书名: Delphi 11 Alexandria Edition.pdf 匿名方法可以让我们把一个方法的实际代码当成参数来进行传递,而不用事先定义,然后把方法的名字当成了参数,另外匿名方法对局部变量的生命周期管理与其他方法的 阅读全文
posted @ 2022-12-19 15:44 一曲轻扬 阅读(226) 评论(0) 推荐(0) 编辑
摘要: 这本书可以在 Delphi研习社②群 256456744 的群文件里找到. 书名: Delphi 11 Alexandria Edition.pdf 泛型在C++中叫做类型模板(template classes),单从字面上理解,模板是将一个事物的结构规律予以固定化、标准化的成果,它体现的是结构形式 阅读全文
posted @ 2022-12-19 09:43 一曲轻扬 阅读(688) 评论(0) 推荐(0) 编辑
摘要: 这本书可以在 Delphi研习社②群 256456744 的群文件里找到. 书名: Delphi 11 Alexandria Edition.pdf 置顶: 一看到"内存"这两个字我就发抖.... 这些年来,Delphi 行动装置编译器提供了一个不同的内存模式,称为自动参考计数(ARC,Automa 阅读全文
posted @ 2022-12-10 19:59 一曲轻扬 阅读(211) 评论(0) 推荐(0) 编辑
摘要: program Project1; //注意,这是工程文件(工程源码) uses //引用 Winapi.Windows,如果还要弹窗就引用 Vcl.Dialogs Vcl.Forms, Winapi.Windows, Vcl.Dialogs, Unit1 in 'Unit1.pas' {Form1 阅读全文
posted @ 2022-12-10 14:43 一曲轻扬 阅读(153) 评论(0) 推荐(1) 编辑