频道分类
您的位置:网站首页 > 系统

Delphi版inf方式加载驱动

programbb;usesWindows;constMAX_CLASS_NAME_LEN=128;DIF_REMOVE=$00000005;DICD_GENERATE_ID=$00000001;IN…

类别:系统 标签: 作者:admin 日期:2020-06-02 11.08.17

Delphi 测试磁盘是否具有写访问权限

Delphi测试磁盘是否具有写访问权限functionCanWrite(drive:string):boolean;varOldMode:Cardinal;beginOldM…

类别:系统 标签: 作者:admin 日期:2020-05-28 15.34.38

delphi 创建Win桌面快捷方式,实现360桌面图标数字提示 或 类似安卓的右上角的数字提示

创建Win桌面快捷方式,实现360桌面图标数字提示或类似安卓的右上角的数字提示//引用单元usesWinapi.ShlObj,…

类别:系统 标签: 作者:admin 日期:2020-05-06 10.42.23

delphi 屏幕DPI计算

procedureTForm1.Button1Click(Sender:TObject);varDC:HDC;t:integer;beginDC:=GetDC(0);t:=GetDeviceCaps(…

类别:系统 标签: 作者:admin 日期:2020-04-13 13.38.18

Delphi 增加/获得windows用户帐号

unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,St…

类别:系统 标签: 作者:admin 日期:2020-03-28 23.14.43

Delphi编写的一款锁屏小工具

Delphi编写的一款锁屏小工具,双击程序立即锁屏,木有界面的。解除锁屏密码:alt+空格。unitUnit1;interface…

类别:系统 标签: 作者:admin 日期:2020-03-28 23.12.08

Delphi 创建应用程序的快捷方式

unitUnitMain;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Clas…

类别:系统 标签: 作者:admin 日期:2020-03-28 13.33.48

delphi 利用Delphi监视注册表的变化

我们在编写软件的时候,常常需要把一些信息保存到系统的注册表中。如果用户更改了注册表的信息,我们如何及…

类别:系统 标签: 作者:admin 日期:2020-03-23 09.06.55

delphi获取操作系统已运行的所有窗口程序

WinAPI:GetClassName-获取指定窗口的类名==============================================//声明:GetClassN…

类别:系统 标签: 作者:admin 日期:2020-03-23 08.57.44

delphi Wmi 获取操作系统信息

unitUnit1;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes…

类别:系统 标签: 作者:admin 日期:2020-03-12 22.28.29

delphi 通过注册表获取系统版本和CPU型号

usesRegistry;procedureTForm1.FormCreate(Sender:TObject);varmm:TRegistry;cpu:string;beginmm:=TRegistr…

类别:系统 标签: 作者:admin 日期:2020-03-12 22.17.41

delphi 获取当前系统版本号

unitUnit1;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes…

类别:系统 标签: 作者:admin 日期:2020-03-12 22.16.24

delphi WMI 取硬件信息

unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Con****ols,****s,Dialogs,…

类别:系统 标签: 作者:admin 日期:2020-03-10 15.55.24

delphi 检查注册表键、键值是否存在

usesRegistry;//==============================================================================//注册表…

类别:系统 标签: 作者:admin 日期:2020-03-10 10.42.35

delphi 判断驱动器盘符是否有效

functionIsValidDriveLetter(constC:Char):Boolean;beginResult:=CharInSet(C,['A'..'Z','a'..'z']);end;

类别:系统 标签: 作者:admin 日期:2020-03-08 13.47.07

Delphi检查是否在64位Windows环境中运行?

{$J+}functionIsWow64Process:Boolean;typeTIsWow64Process=function(hProcess:THandle;varWow64Process:Bo…

类别:系统 标签: 作者:admin 日期:2020-03-06 21.17.02

delphi xe IOUtils TPath(结构体) 的方法与属性

引用单元usesIOUtils;以后路径相关的处理,用IOUtils.TPath就很方便了.//较常用的方法:TPath.GetTempPath;{获…

类别:系统 标签: 作者:admin 日期:2020-03-05 11.14.23

delphi 判断操作系统是否是64位的函数

functionTmain.IsWin64:Boolean;varKernel32Handle:THandle;IsWow64Process:function(Handle:Windows.THand…

类别:系统 标签: 作者:admin 日期:2020-02-29 12.31.38

Delphi 创建一个进程并读取其控制台输出内容

///<summary>创建一个进程并读取其控制台输出内容</summary>///<paramname="AFileNam…

类别:系统 标签: 作者:admin 日期:2020-02-22 14.24.31

Delphi 检查Windows10系统应用模式(深色/黑暗 查看更多关于 深色/黑暗 的文章 或浅色/明亮)

主要代码procedureT****1.Button1Click(Sender:T****);beginifDarkModeIsEnabledthenShowMessage('当前…

类别:系统 标签: 作者:admin 日期:2020-02-20 20.36.29