Delphi2010 - 随笔分类(第2页) - 涂磊

Delphi10.3里Memo1的查找--替换---功能Action实现

摘要：添加一个ActionList1,添加 StandardAction里的Search里的Search里的SearchFind 假设Memo1的PopupMenu为PopupMenu1 在里的一个新建空白菜单设置为SearchFind1 Memo1的HideSelection一定要设为False 按下C 阅读全文

posted @ 2024-10-21 14:43 涂磊阅读(16) 评论(0) 推荐(0) 编辑

Delphi10.3 RadioGroup1多选一的组件用法

摘要：https://www.cnblogs.com/jijm123/p/14237063.html 1]添加RadioButton项目也可用代码添加 RadioGroup1.Items.Add('Delphi7'); RadioGroup1.Items.Add('Delphi10.3'); 而不是添加阅读全文

posted @ 2024-10-19 18:30 涂磊阅读(68) 评论(0) 推荐(0) 编辑

Delphi10.3 之 TLinkLabel使用

摘要：https://www.cnblogs.com/del/archive/2008/08/13/1267175.html uses ShellAPI; procedure TForm1.FormCreate(Sender: TObject); begin LinkLabel1.Caption := ' 阅读全文

posted @ 2024-10-19 18:07 涂磊阅读(20) 评论(0) 推荐(0) 编辑

listbox1.ItemAtPos方法

摘要：procedure TForm1.ListBox1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); var s:tpoint; begin s.X:=x; s.Y:=y; Label1.Caption:= listbox1. 阅读全文

posted @ 2024-10-18 16:25 涂磊阅读(12) 评论(0) 推荐(0) 编辑

Delphi10.3控件水平，垂直均匀排列

摘要：用鼠标框选中控件，再右键先水平左对齐，再垂直间隔相同同理，水平均匀排列也一样，先顶对对齐再水平间隔相同阅读全文

posted @ 2024-10-16 15:40 涂磊阅读(15) 评论(0) 推荐(0) 编辑

直接在当前窗口使用控件新属性，如button添加颜色，memo关键字着色

摘要：直接在当前窗口使用控件新属性，如button添加颜色，memo关键字着色,不用新建一个单元，或者控件，再来引用使用 https://www.cnblogs.com/zhangzhifeng/p/9072835.html Delphi自写组件：可设置颜色的按钮 https://www.cn 阅读全文

posted @ 2024-10-16 14:36 涂磊阅读(14) 评论(0) 推荐(0) 编辑

Delphi 10.3中CheckListBox1的使用

摘要：var i:integer; begin for I := 0 to CheckListBox1.Count -1 do if CheckListBox1.Checked[i] // 左边的 Check框是否勾中 then showmessage(CheckListBox1.Items[i] ) 阅读全文

posted @ 2024-10-14 09:52 涂磊阅读(136) 评论(0) 推荐(0) 编辑

Delphi10.3关键字自动填充完成AutoComplete

摘要：通过网盘分享的文件：DelphiAutoComplete.rar 链接: https://pan.baidu.com/s/1l4oZIeS3SJgn5P8aLAjyBA 提取码: rrwz uses System.StrUtils; //字符串函数声明两个全局变量 var aStringList: 阅读全文

posted @ 2024-09-25 14:43 涂磊阅读(25) 评论(0) 推荐(0) 编辑

第三方控件-语法高亮-SynEdit在Delphi10.3上的安装和使用

摘要：https://www.cnblogs.com/Thenext/p/15907248.html 还有个 SynEditStudio V5.8 fix 2 完整版，只支持Delphi7,不支持 Delphi10.3https://www.2ccc.com/article.asp?articleid=4 阅读全文

posted @ 2024-09-08 21:00 涂磊阅读(193) 评论(0) 推荐(0) 编辑

DrawGrid1自画图标和文本

摘要：通过网盘分享的文件：DrawGrid.rar链接: https://pan.baidu.com/s/1ihZ1wFkPEVxr4v02dgMFVA 提取码: 81e https://www.packtpub.com/en-us/product/delphi-cookbook-second-editi 阅读全文

posted @ 2024-08-30 11:28 涂磊阅读(28) 评论(0) 推荐(0) 编辑

达梦数据库在Delphi10.3上的安装与连接

摘要：select * from TABLE_1 查询其他模式内的表，前面加上模式名 SELECT * from "DMHR"."CITY" 阅读全文

posted @ 2024-08-28 14:38 涂磊阅读(63) 评论(0) 推荐(0) 编辑

ListBox自画

摘要：https://www.packtpub.com/en-us/product/delphi-cookbook-second-edition-9781785287428/chapter/delphi-basics-1/section/using-owner-draw-combos-and-listbo 阅读全文

posted @ 2024-08-14 16:10 涂磊阅读(36) 评论(0) 推荐(0) 编辑

DBGrid之进度条显示

摘要：https://www.packtpub.com/en-us/product/delphi-cookbook-second-edition-9781785287428/chapter/delphi-basics-1/section/customizing-tdbgrid-ch01lvl1sec11 阅读全文

posted @ 2024-08-12 15:18 涂磊阅读(56) 评论(0) 推荐(0) 编辑

改变StringGrid1，DBGrid1默认背景色

摘要：1]将DrawingStyle设为gdsClassic 2]设置Color背景颜色值类似地DBGrid1也一样设置背景颜色Delphi10.3的DBGrid美化(03) 阅读全文

posted @ 2024-06-29 13:14 涂磊阅读(26) 评论(0) 推荐(0) 编辑

delphi 怎样用字符串叫出对象来用

摘要：TButton(findcomponent('button4')).Click; 阅读全文

posted @ 2024-05-30 14:56 涂磊阅读(27) 评论(0) 推荐(0) 编辑

Dellphi10.3菜单项的 hint

摘要：菜单项的 hint 可以用 ”简短|详细说明“ 这种格式，其中详细说明部分可以自动显示在 TStatusBar中，TStatusBar.AutoHint 设置为 True uniGUI学习之自定义Hint(74) 阅读全文

posted @ 2024-05-24 20:59 涂磊阅读(22) 评论(0) 推荐(0) 编辑

逗号分开的字符串，统计个数从高到底排序

摘要：uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, System.RegularExpressions, function CompareStrin 阅读全文

posted @ 2024-05-22 15:36 涂磊阅读(16) 评论(0) 推荐(0) 编辑

With do结构的作用

摘要：With do结构的作用，除了在少写很多的前置代码，但会影响代码阅读清楚另一个作用是，在动态运行时创建代码时使用，会方便很多，少写一些局部变量的申明代码 procedure TForm13.Button2Click(Sender: TObject); begin with Tbutton 阅读全文

posted @ 2024-05-20 10:25 涂磊阅读(14) 评论(0) 推荐(0) 编辑

could not convert variant of type(NULL) into type(OleStr)

摘要：问题出在如果筛选出Column.Field.Value为空值，不能转为 OleStr类型，要用VarToStrDef进行转换。另外一种解决方法 if not varisnull(Column.Field.Value) then ComboBoxEx1.ItemIndex := ComboBo 阅读全文

posted @ 2024-05-20 10:21 涂磊阅读(207) 评论(0) 推荐(0) 编辑

Panel 如果设置永远在form的中间

摘要：方法一，panel1大小不会变 procedure TForm4.FormResize(Sender: TObject); begin panel1.Top:= (form4.ClientHeight- panel1.Height)div 2; panel1.Left:= (form4.Client 阅读全文

posted @ 2024-05-13 14:39 涂磊阅读(30) 评论(0) 推荐(0) 编辑

随笔分类 - Delphi2010

搜索

随笔分类 (686)