| | | | | |

2023年12月24日

摘要：也可参考 cxRTTIInspector1学习(20) 用RTTI https://www.jianshu.com/p/784db6186e49 uses strutils, rtti, System.typinfo; procedure TForm2.FormCreate(Sender: TObj 阅读全文

posted @ 2023-12-24 20:09 涂磊阅读(13) 评论(0) 推荐(0) 编辑

Delphi 枚举转字符串

摘要： implementation Uses TypInfo; procedure TForm3.FormCreate(Sender: TObject); //定义枚举类型 type TDayOfWeek=(Monday,Tuesday,Wednesday,Thursday,FriDay,Saturday 阅读全文

posted @ 2023-12-24 18:38 涂磊阅读(67) 评论(0) 推荐(0) 编辑

2023年12月23日

delphi - 调整表单大小，同时保持纵横比

摘要： https://www.coder.work/article/5928583 在Form1的 OnCanResize 事件添加以下处理程序似乎对我来说效果很好: procedure TForm2.FormCanResize(Sender: TObject; var NewWidth, NewHeig 阅读全文

posted @ 2023-12-23 09:40 涂磊阅读(39) 评论(0) 推荐(0) 编辑

2023年12月22日

uniGUI学习之表格和链接(76)

摘要： Delphi10.3如何在StringGrid某单元格下划线显示，并点击弹出新窗口拖一个UniHTMLFrame1到界面上 <table border="1" width="500" height="200" align="center" cellpadding="10" cellspacing= 阅读全文

posted @ 2023-12-22 17:11 涂磊阅读(181) 评论(0) 推荐(0) 编辑

Delphi：循环语句for-in

摘要： https://www.jianshu.com/p/0fd88af44e4b 1.for-in 循环中，循环对数组，列表，字符串或其他有序类型的容器的每个元素进行操作。 2.打开IDE，新建VCL应用，添加一个button1，一个memo1，双击button1，编写代码： procedure 阅读全文

posted @ 2023-12-22 16:41 涂磊阅读(127) 评论(0) 推荐(0) 编辑