一曲轻扬

摘要： 在Delphi中处理浮点计算，可以使用内置的浮点型数据类型，如Single、Double、Extended等。这些数据类型都支持基本的数学运算操作，如加、减、乘、除等。 为了保留指定位数的小数，可以使用格式化字符串的方法。例如，使用Format函数将浮点数格式化为指定位数的字符串，然后再将字符串转换 阅读全文

摘要： 如果你玩过EXCEL的条件格式化,那么你在这里应该会很容易上手. 数据库和cxgrid的设置,这里就略过了. 右键表格,选择 Edit Layout and Data... 或者 Conditional Fromatting...都可以.这里我们选择 Edit Layout and Data... 阅读全文

摘要： 1.当我们绑定好数据库之后,默认是全部折叠的,只显示 + 全部 cxDBTreeList1.Root.getFirstChild.Expand(False); //只展开第一层目录,注意除非是在create或者show事件,否则对于已经被操作过的目录,必须先折叠所有节点,才会有效cxDBTreeLi 阅读全文

摘要： 举例: 当我按下ESC键时,不管焦点在哪里,我都要关闭这个窗体 实现: 1.勾选窗体的 KeyPreview属性 然后设置窗体的OnKeyDown事件,#27是ESC键,如果是组合键,请用Shift参数来判断 procedure TCalculator.FormKeyDown(Sender: TOb 阅读全文

摘要： 效果图: 数据库设计: 设计视图: 方法一使用TcxEditRepository控件.双击TcxEditRepository控件,进行添加.这里选择新增货币格式. 为每一种样式设置属性: 接下来关联需要设置的列.但不是在面板里直接设置,而是通过代码 选中需要设置的列,然后在其OnGetPropert 阅读全文

摘要： 效果图: 需求: 当用户新增或者删除控件时,后面的控件(如果有的话)自动后退或者前移 实现: 需要用的控件是TFlowPanel,临时演员是TscGPEdit 1.TFlowPanel设置好合适的对齐,其他基本上不用怎么设置,默认即可 2.设置TscGPEdit的AlignWithMargins:= 阅读全文

摘要： 效果图 面板设置: 1.把导航面板显示出来: Navigator.visible:=true 2.在Navigator-Buttons下设置自己需要显示或者隐藏的按钮 3.添加自定义按钮 双击CustomButtons,弹出新增按钮的窗体,在这里完成新增与属性设置.注意,这里是设置不了事件的,不要着 阅读全文

摘要： 原文已删除. 2024-03-22修正: 效果图: 需求: 在cxgrid执行过虑操作前,重新定义关键词,实现模糊匹配.比如用户输入"ABC",则改为"%ABC".实际上,对于文本匹配,cxgrid默认会在关键词后面多加一个"%"号,所以我们只需要在前面加一个"%"就可以了 核心代码: proced 阅读全文

摘要： 先看效果图 效果要求: 1.点击申领数量时,自动设置此物料可领上限,与可退的下限 2.申领数量为0时,不更新 说明: 1.使用了cxGrid+FireDAC 2.TFDQuery控件不要开快储功能(CachedUpdates不要勾选) 3.因为表格数据为多表联合查询的数据,所以这里要设置一下更新指向 阅读全文

摘要： 简单的设计一下界面,大致如下: 要求:审核或者反审核用户选择的数据 1.正常点审核时,审核=true,审核人=当前用户名 2.反审核时,审核=false,审核人=null 实现代码: procedure TForm1.UpdateData(flg: Boolean); var i, n, Error 阅读全文

摘要： 今天遇到个问题, 设计时,[审核人] 字段是有数据的 数据库里的 [审核人]字段 也是有数据的 但是偏偏运行时没有数据 首先排除字段绑定问题,因为设计阶段是有数据的,然后仔细检查create事件,发现里面有设置默认值操作,怀疑这些操作触动了查询操作,然后查询函数中打断点,一步步跟进.最后发现是查询函 阅读全文

摘要： 宏参数 & 第一步: 我们先在TFDQuery组件中写个SQL模板,内容为(不要点[执行]或者active,不会成功的): SELECT &Fields FROM &Table &WhereWords 上面一共使用了三个宏参数,它们分别表示 字段(s),表名,以及条件语句.TFDQuery组件下的M 阅读全文

摘要： 以下内容均摘转载于 【麦麦提敏】 :https://www.cnblogs.com/karkash/ 第一章 FireDAC 数据库开发笔记 开发数据库应用应用程序 第二章 FireDAC 数据库开发笔记 快储机制 第三章 FireDAC 数据库开发笔记 使用内存数据组件 FDMemTable 第四 阅读全文

摘要： 需求: 窗体上下两个表,上面是主表,下面是从表. 当点击主表上的记录时,从表显示出此物料的入仓记录 效果如下图所示 操作步骤: 正常设置 主表+DS主表, 从表+DS从表 主表 然后是设置 从表 然后我们必须要理解的是: 从表 的数据应该是根据 主表 选择的记录来进行筛选的 但是 主表 里面那么多字 阅读全文

摘要： 当一个项目从一台电脑转移到另一台电脑时,经常出现各种各样的问题,让人非常苦恼.而IDE给出的错误提示也非常有限,让我这个小白总是花费很多的时间去寻找解决方案(百度,找大神,群里问),真是在累了.写下这篇文章,希望用我的亲身经历来告诉大家应该怎么处理.有说得不对,做的不好的地方,欢迎斧正,感谢! 起因 阅读全文

摘要： uses Vcl.OleAuto procedure T供应商管理.dxBarLargeButton3Click(Sender: TObject); var SaveDialog: TSaveDialog; path: string; //路径信息 ExcelAPP: Variant;//变体变量 阅读全文

摘要： 百度这个标题,出来N多结果,但是每一种都有问题 方法1: 下面这种方法基本还行,但是会漏字,什么意思呢,比如 东莞深圳,它只返回DS ,莞和圳都被吃掉了. https://www.shuzhiduo.com/A/A7zg3XrKz4/ //取汉字的拼音首字母 function GetHzPy(AHz 阅读全文

摘要： 主从表的问题. 效果图大概如下图所示,它能体现出主表里每一条记录的入仓记录,左边的加减号可以展示与隐藏从表. 结构设计如上图右下角所示,做两个level,和两个DB table,从结构上可以很晰的看到,TV报废池是主表,TV查询是从表. 我们需要做两组数据集,SQL内容按业务自己看着写. 然后是主从 阅读全文

摘要： 我写的博客内容,都是在实际生产中遇到的问题,针对性很强,记录下来有两个目的,一是当成笔记,二是丰富Delphi的网上资料,让遇到相同问题的朋友,少走弯路. 如下图,我希望所属仓库,供应商,物料用途这三个字段,我希望做成下拉菜单的形式给用户选择, 但因为这个表格是多表联合查询得出来的结果,如果直接交给 阅读全文

摘要： 需求环境: 1.用户登陆成功后,我用一个记录类型TUser,来记录用户相关的一个信息,其中包括一些权限,这部分内容大概有几十个之多. 这里我们先不讨论这种方案的优劣,只谈实现方法 2.现在设定:当用户想要点开某一个模块时,需要先要在TUser里面查询用户是否有权限打开这个模块.因为权限太多了,不可能 阅读全文