一曲轻扬

摘要： 1.picture属性:加载图片 2.隐藏边框:Style BorderStyle:=ebsNone 3.设置控件背景色: style color 4.properties属性设置: 5.禁用右键菜单.properties PopupMenuLayout MenuItems. 当然你也可以保留你需要 阅读全文

摘要： 此控件仅支持数字数.默认情况下不支持小数点,但支持负数输入. 1.设置控件支持小数点输入. properties valueType:= vtFloat 2.隐藏边框右边的微调按钮. properties SpinButtons visble:=false 3.设置文本框内文本对齐方式. 4.限制T 阅读全文

摘要： TcxPropertiesStore组件能记住用户对窗体,网格(列宽/行高,显示/隐藏列),按钮,工具栏等多种形态与位置的记忆. 其原理其实就是开发时,在TcxPropertiesStore里设置好要记忆的控件,在用户退出程序时,把用户的设置保存到一个ini文件里,当希望再次打开程序时,再加载这个i 阅读全文

摘要： 当用户的键盘和鼠标无操作超过才一个时间值时,执行锁屏程序 //使用TTimer控件的OnTime事件procedure TForm1.Timer1Timer(Sender: TObject); begin //锁屏.当用户设置了自动锁屏,并且锁屏程序没有启动时,这两个都是自定义变量 if UserI 阅读全文

摘要： 格式: cxsetresourceString(@指针地址,汉化内容) 需要引用 :dxCore,cxGridPopupMenuConsts (ctrl+点击 可以查看指针列表) 何时使用:在窗体创建或者显示前设置. 假设现在我们修改GroupByBox的标题 我们只要这么做就可以了: implem 阅读全文

摘要： 一.WholeRow工具显示模式 WholeRow:true 工具栏单独在一行显示,不管你有几个内含元素 默认为WholeRow:false,即同一行内可以排列多个工具栏,像下图就同时排列了三个工具栏 二.禁止用户移动工作栏,禁用用户自定义 默认情况下,工具栏是可以自由拖拽出来,悬放在任意位置,或者 阅读全文

摘要： 最近开始学DEV的TcxGrid控件,属性太多了,看得眼都花了! 有些功能还需要多属性配合才能发挥作用,如果没有大佬或者教程指点,真的很容易崩溃. 下面的这个功能,我搞了差不多三个小时,现在想想都是泪啊... 再次感谢群里几位大佬的指点: 期望效果: 用户可复制单元格内容,但又不希望用户有编辑的权限 阅读全文

摘要： 2022-08-29 更加细致的内容: https://www.cnblogs.com/usegear/archive/2013/03/24/2978370.html cxGrid1DBTableView1.Controller.FocusedRowIndex 当前行号 cxGrid1DBTable 阅读全文

摘要： 想要达到的效果: 通常情况下,如果字段的值为布尔值,在TcxGrid控件上就会体现为左边的样式,相对于左边的样式,右边的样式会表达的更直观一点,这就是本篇要讲的内容 选中[IsDisable]列,在事件中选择OnGetDisplayText procedure TForm1.cxGridDBColu 阅读全文

摘要： 注:本篇内容与上一篇内容有部分关联: https://www.cnblogs.com/yoooos/p/16610379.html 效果要求: 一.每次点击cxPopupEdit1时,弹出树状结构 二.树状结构的数据为数据库实时数据 三.树状结构显示时自动展开 四.双击树状结构,把返回值赋值给cxP 阅读全文

摘要： 效果要求: 点击树形结构不同的行,弹出不一样的下拉菜单 窗体设计: 数据库设计: 因为树形结构用的是DEV的TcxDBTreeList组件,ID/组织名称/父级ID/图片ID这四个是必须的. 类型是用来判断是组织属性的(0为公司,1为部门,你也可以分的更细一点).部门是可有可无的. 树形结构字段绑定 阅读全文

摘要： 刚开始新建时,我acok是取名为mrok,acno是取名mrno,所以直接弹错"TModalResult" 与 "TAction"不兼容 最后是在重写 ModalResult:=mr....时,看到mrok和mrno提示后面的属性,居然是TAction,才明白原来是取名不规范造成的! 大致如下: 正 阅读全文

摘要： application.ProcessMessages的主要作用使程序在循环时能够相应外界事件。 一般情况下，程序在循环的时候不响应外界事件。直到循环结束为止才能接受和响应外界事件。 application.ProcessMessages可以有效的解决循环循环的独占问题，能够暂时中断应用程序的执行。 阅读全文

摘要： uses FileCtrl; //引用这个单元就可以了,不用添加其他打开类组件 var Dir: string; begin if SelectDirectory( '选择目录 ', ' ',Dir) then //Dir存储着用户选择的目录名称 edit1.Text :=dir; end; 阅读全文

摘要： 这个问题是群里一位网友发的问题.我请教了猫哥,学到了点东西,所以把这个知识点记下来. 设计图: 成品图: 以下是代码: unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Varian 阅读全文

摘要： type TArr = array of TPoint; {把数组先定义成一个类型会方便许多, 这里仅用 TPoint 测试} {删除动态数组指定元素的过程: 参数 arr 是数组名, 参数 Index 是要删除的索引} procedure DeleteArrItem(var arr: TArr; 阅读全文

摘要： 在浏览器书签栏空白处右击,新建标签,然后名字自取,网址处粘贴代码. 代码总体结构是 "JavaScript: + 自运行函数". 以下这段案例是修改页面CSS的代码: JavaScript: (function(){ var table = document.querySelector("table 阅读全文

摘要： 效果图如下: 本程序使用了DEV组件的(TcxRTTIInspector控件),和SC组件的几个基本控件,SC控件为非必须,只是为了方便演示. 设计图: 核心代码: var Form5: TForm5; arr: array of Integer; implementation {$R *.dfm} 阅读全文

摘要： Close:1.只关闭本窗体2.当Close是一个主窗体时,程序会退出。3.Close会发生FormClose事件,FormCloseQuery事件4.主窗体close以后程序就Application.Terminate了5.子窗体close以后。没释放,还可以Show出来。6.也是说主窗口的Clo 阅读全文

摘要： 1.抽象 (相当于制造前 画图纸/捏造/想象对象的阶段,还没开始造) 1.1.类在 type 之下定义. 1.2.类的结构: type TPerson = class end; 类名为TPerson,你可以随便取,但应该符合命名规范.前面的T 为类名约定前缀,你可以不要. 2.实例化.(把抽象好的对 阅读全文