摘要：
这本书可以在 Delphi研习社②群 256456744 的群文件里找到. 书名: Delphi 11 Alexandria Edition.pdf 置顶: 好烧脑啊! P344-365 接口 "接口" 的概念和 "类" 特别是 "抽象类" 近似, Delphi 之初并没有接口, 后来(Delphi 阅读全文
摘要：
故事这样的: 我有一批按钮需要共同一个点击事件,本来是按最普通的方法,批选了这些按钮,然后双击click事件,然后写代码,最主要的是这句: iTag: = TControl(Sender).Tag; 这种情况下这么确实也是没有问题的. 后来为了方便代码管理,我添加了一个TActionList控件,并 阅读全文
摘要：
设计图: 效果图(GIF录制的有点卡顿,实际上是很丝滑的): 主要控件设置(细讲不了啊,属性太多了): TscGPCharGlyphButton控件 外观设置主要在Options里面,这里就不讲了,主要讲怎么设置图标,里面有很多内置图标,找一个你喜欢的 TscSplitView控件请看我之前的笔记 阅读全文
摘要：
随便比画了一下，零代码，效果如下。 这是设计图,用到了五个控件， 1.DEV的cxImageList,这个可以随便换，我只是懒得找图标而已。 2.scGPPanel 3.scSplitView这个可有可无，看你需求吧，这个控件我之前有写过两篇教程，有兴趣的可以搜索 4.scToolBar工具条 5. 阅读全文
摘要：
这本书可以在 Delphi研习社②群 256456744 的群文件里找到. 书名: Delphi 11 Alexandria Edition.pdf ●P225-254 类是抽象的,变量是类的具现. 类在定义时,只是定义了它有这些属性和方法,不会把实际代码写在里面,但是必须要在同一个单元里完成(实际 阅读全文
摘要：
type Ptest = function(Str: string): string of object; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var 阅读全文
摘要：
今天群里有网友说Edit不想通过回车键执行查询,也不想每次change都执行查询,我就提出了这个方案.GetIdleTime是获取键盘与鼠标距离上次输入的时间. 这里声明了两个全局私有变量i和flg,其中i不是必须的,只是用来观测时间值. var i: Cardinal; flg: Boolean 阅读全文
摘要：
这本书可以在 Delphi研习社②群 256456744 的群文件里找到. 书名: Delphi 11 Alexandria Edition.pdf 先置顶一下大佬的话 致看到这里的朋友一些提示: 书上的内容有些看不懂很正常,也不要着急,可以往下找找,作者可能在下面给出了答案,不要一有问题就到处找资 阅读全文
摘要：
这本书可以在 Delphi研习社②群 256456744 的群文件里找到. 书名: Delphi 11 Alexandria Edition.pdf P30: 在声明一个函数或者过程时,在其上方用 /// 或者 {! 插入注释,在其它地方使用时,把鼠标悬停在这个函数或者过程上面,会显示出这些注释 D 阅读全文
摘要：
效果图: 设计图: scSplitView设置: opened:false; openedwidth:150;(按你自己需求) compactwidth:35;(确保只能看到图标即可) 设计技巧: compactwidth先设置成全尺寸,等全部设计完成后,再调成合理值. 需要用到两个事件.一个是on 阅读全文
摘要：
一.先说效果吧,放置的位置不一样,显示出来的效果也不一样 然后效果是这样的: 注意 位置标记1 按钮的位置 . 当DisplayMode := scsvmOverlay时,会遮挡 TscSplitView范围(OpenedWidth)以内的所有对象, 当DisplayMode := scsvmDoc 阅读全文
摘要：
当物料类型为 刀具仓时,单位 自动修改为 粒 当物料类型为 原料仓时,单位 自动修改为 公斤 反之亦然. 这是两个相互联动的控件,如果直接写的话,会直接死循环. 如何做到只让控件修改一次就不再联动的目的呢? 我们需要一个计数器来做辅助. 设置一个全局变量 ChangComCount:integer; 阅读全文
摘要：
转载自:http://t.zoukankan.com/hnxxcxg-p-2940801.html 以下代碼在D7+ACCESS+FastReport 3.15版中測試通過. 1.將FastReport存入數據庫中: 在窗體的"Insert"按鈕的OnClick事件中插入下面代碼:(Insert_r 阅读全文
摘要：
我设置了一个双击事件,然后又想通过右键菜单来实现双击整事件里的功能,就这么一个简单的功能,我卡了一天! 主要卡在 ACellViewInfo 这个参数里面,想传这个参数进去,又不会看英文文档,只能慢慢试,还好最后试出来了! 写出来是希望有遇到相同问题的朋友,不要再经历像我一样的痛苦. 先看一下双击事 阅读全文
摘要：
我现在一个窗体里,加载了个TcxGrid 对象,想让这三个对象共用一个右键菜单.所以在菜单弹出之前,要判断是在哪个对象里弹出来,然后设置右键菜单的内容. 在网上找到这段代码: ShowMessage(PopupMenu1.PopupComponent.Name ); 但是一直弹出空白.后来经过猫哥的 阅读全文
摘要：
安装教程:http://t.zoukankan.com/liessay-p-5321278.html 这里给大家提个醒: 以管理员身份运行.如果你想要使用中文版,需要在选择中文时,马上点一下compile,然后再选择Recompile all packages 再点一下compile 如果你打开fa 阅读全文
摘要：
需求: 已知 申购数量 / 单重 = 支数,其中[支数]为自动计算列,且 [支数] 字段实际存在于数据库中 特殊情况: 当单重为0时,支数为0 当 1 > 支数 > 0时,支数=1 procedure TFraModleBase.TV申购清单EditValueChanged(Sender: TcxC 阅读全文
摘要：
需求明细: 1.表格 TV申购清单,默认OptionsData--Editing:true 可写权限 2.默认 列属性 [申购数量,单重,用途,需求日期] Options Editing:true 常规情况下,这几列是可自由修改的. 3.当物料代码前四位为'temp'时, 列 [物料名称,规格型号, 阅读全文
摘要：
用FormatFloat来处理浮点数,是一个很好的选择. 我这里只讲一种语法: FormatFloat(格式,数值) 第一坑: 第二参数为数值类型,别传个文本值进去. 第二坑: 返回值是一个string.如里需要转换为数值,需要再套一个转化函数 :StrToFloat(FormatFloat(格式, 阅读全文
摘要：
本文写于2022-10-14,D版本10.3.3 引用单元: uses System.RegularExpressions 1、TRegEx.Match方法 Match()方法总是获取满足条件的第一个匹配，而不关心满足条件的匹配有多少个。 Match()方法都回一个Match对象，其中包含了匹配的各 阅读全文