Delphi 2.编程技巧 - 随笔分类 - YXGust

Delphi 自定义窗体类名

摘要：原理就是覆盖原CreateParams函数，重写新CreateParams函数，在新CreateParams函数继承完之后马上修改Parames.WinClassName type TForm1 = class(TForm) private { Private declarations } publ 阅读全文

posted @ 2022-09-17 12:14 YXGust 阅读(214) 评论(0) 推荐(0)

Delphi 格式化函数Format、FormatDateTime与FormatFloat详解

摘要：经常会用到格式化函数，每次都是百度解决问题，现在把他们收录下来，不用再到处找了。阅读全文

posted @ 2022-09-03 15:51 YXGust 阅读(2315) 评论(0) 推荐(0)

Delphi 中的换行符sLineBreak

摘要：记住sLineBreak比记住#13#10更容易，以后就用它了。阅读全文

posted @ 2022-08-24 21:51 YXGust 阅读(928) 评论(0) 推荐(0)

Delphi 无边框窗体移动

摘要：在控件的MouseDown事件中加入代码阅读全文

posted @ 2022-08-18 10:57 YXGust 阅读(397) 评论(0) 推荐(0)

Delphi 让Listview中的item可以显示不同的颜色

摘要：在ListViewAAdvancedCustomDrawItem消息函数中根据Item.SubItems[0]来制定颜色。阅读全文

posted @ 2022-08-16 21:52 YXGust 阅读(724) 评论(0) 推荐(0)

Delphi 实现无标题栏覆盖整个屏幕(适合屏保)

摘要：Delphi 实现无标题栏，覆盖整个屏幕，这个在做工控机或屏保时或者做护眼保护程序时有用，所以记下 procedure TForm1.FormCreate(Sender: TObject); begin with Form1 do begin Top := 0; Left := 0; BorderS 阅读全文

posted @ 2022-08-09 10:39 YXGust 阅读(273) 评论(0) 推荐(0)

Delphi 利用信号变量实现多进程之间排队同步

摘要：利用OpenSemaphore函数可以在多个进程之间进行同步排队操作。阅读全文

posted @ 2021-04-20 19:00 YXGust 阅读(292) 评论(0) 推荐(0)

YXGust