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

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

Delphi 如何确定屏幕分辨率

有两种方法可以确定屏幕的高度和宽度。使用全局Screen变量usesForms;...Screen.Height{Screenheightinpixel…

类别:系统 标签: 作者:admin 日期:2020-02-10 20.11.06

Delphi 如何刷新文件图标

如何刷新文件图标每当更改系统图标时,您都必须将此通知Windows。仅Windows(Windows)不会对此进行检查,您…

类别:系统 标签: 作者:admin 日期:2020-02-10 20.08.32

Delphi 判断系统服务是否运行

usesWinSVC;functionisServiceRunning(ServiceName:AnsiS****ing):Boolean;varaServiceCon****ol:SC_Handle…

类别:系统 标签: 作者:admin 日期:2020-02-09 21.28.18

Delphi Android ADB USB上读取设备信息

functionIsWinNT:boolean;varOSV:OSVERSIONINFO;beginOSV.dwOSVersionInfoSize:=sizeof(osv);GetVersionEx(…

类别:系统 标签: 作者:admin 日期:2020-02-09 21.04.04

Delphi 获取系统服务SERVICE ID

unitDemo;interfaceusesWindows,Forms,SysUtils,StdCtrls,WinSvc,Controls,Classes;type//Formforbasicdemo…

类别:系统 标签: 作者:admin 日期:2020-02-09 17.03.50

Delphi 遍历系统窗口标题可用于反外挂反破解

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

类别:系统 标签: 作者:admin 日期:2020-02-08 13.37.40

Delphi 创建快捷方式的单元文件

unitfun;interfaceusesWindows,Forms,SysUtils,TlHelp32,ActiveX,ComObj,ShlObj;procedurecreatelink;//创建…

类别:系统 标签: 作者:admin 日期:2020-02-08 13.21.38

Delphi 自定义消息拦截

1.自定义消息拦截unitUnitMessageHook;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,Syst…

类别:系统 标签: 作者:admin 日期:2020-01-31 20.30.08

Delphi DLL注入x86/x64/Win2k~Win8.1全可用

programInject;{$APPTYPECONSOLE}{$IFCompilerVersion>=21.0}{$WEAKLINKRTTION}{$RTTIEXPLICITMETHODS([])P…

类别:系统 标签: 作者:admin 日期:2020-01-30 02.30.32

Delphi 调用cmd获取java 版本号

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

类别:系统 标签: 作者:admin 日期:2020-01-30 02.13.46