![](https://img-blog.csdnimg.cn/20201014180756925.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
Delphi开发
BlueStorm
这个作者很懒,什么都没留下…
展开
-
在Delphi程序中提取本身的DFM资源数据
在Delphi程序运行时, 提取程序本身的DFM资源数据原创 2023-02-24 11:35:17 · 331 阅读 · 0 评论 -
【Delphi Frame 使用示范】
帮助Delphi初学者学会使用Frame编程原创 2023-02-17 18:10:08 · 1077 阅读 · 0 评论 -
【Delphi】以高性能方式把线程信息显示在界面上的一个通用小框架【2023-08-05更新】
Delphi通常使用TThread.Synclonize把线程信息显示到界面上,但由于此方法需与主界面同步,会拖慢线程的运行,如果显示的信息比较多或更新很快,对程序的性能会有比较大的影响。此框架使用PostMessage异步方式,最大程度地提高了程序的性能,并保证了信息显示的顺序原创 2021-01-25 12:33:17 · 1787 阅读 · 0 评论 -
【Delphi】运行程序时自动检查程序是否已经有一个实例在运行
//uCheckAppRunning.pas:unit uCheckAppRunning; //检查程序是否已经在运行,不允许运行多个实例interfaceuses System.SysUtils, System.Classes, Winapi.Windows, Vcl.Forms, Winapi.Messages, Vcl.ExtCtrls, Vcl.Menus, Vcl.Dialogs, Winapi.TlHelp32, Winapi.PsAPI;type TShow...原创 2021-01-04 15:58:42 · 1169 阅读 · 0 评论 -
【Delphi】用于企业微信发送信息的示例程序(要求Delphi 10.1及更新版本)
unit uMainForm;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, uWeWork;type TForm1 = class(TForm) Memo1: TMemo; Butt...原创 2020-11-02 15:18:09 · 1544 阅读 · 0 评论 -
【Delphi】把Delphi程序窗口收缩到系统托盘的最简单的实现方法【20201117更新】
把下面的UnitTray单元加入到现有程序项目中就可以了,注意实现所用的方法重载了主Form的OnClose事件://此单元用于控制托盘图标行为unit UnitTray;interfaceuses SysUtils, Classes, Windows, Forms, Messages, ExtCtrls, Menus;type TTray = class(TDataM...原创 2019-07-28 18:50:33 · 1097 阅读 · 0 评论 -
【Delphi】一个功能齐全的Delphi DES类(含3DES)[更新20201130]
//包含DES加/解密和3DES加/解密//---------------------------------------------------------------------------unit u3DES;interfaceuses{$IF CompilerVersion <= 22} Forms, Classes, Windows, SysUtils, Net...原创 2019-07-28 18:59:01 · 3598 阅读 · 14 评论