-
如何安装 Composer
下载 Composer安装前请务必确保已经正确安装了PHP。打开命令行窗口并执行php -v查看是否正确输出版本号。打开命令行并依次执行下列命令安装最新版本的 Composer:复制php-r"copy('https://install.phpcomposer.com/installer','composer-setup.php');"复制p..
2024-04-112024-04-11→ -
Delphi ShellExecuteExWait运行一个程序等待其完成再执行别的
//delphi定义方法ShellExecuteExWait用于程序执行等待,完成程序执行后再运行后面的程序或代码; procedure ShellExecuteExWait(const sProgramm: string; const sParams: string = ''; fHide: Boolean=False); var ShExecInfo: TShellExecuteInfo; be..
2024-04-012024-04-01→ -
Delphi定义函数ExtractRes用于释放RES资源文件
delphi写程序难免会有资源文件,程序调用的时候需要先释放RES资源文件,本函数ExtractRes就是专门用于释放资源文件的!Function ExtractRes(ResName, ResNewName : String):boolean;var Res : TResourceStream;begin GetWindowsDirectory(SysDir,128); //获取系统盘windows文件夹路径 Rjsflj:= copy(SysD..
2024-04-012024-04-01→ -
Delphi自定义函数BuileLink在桌面创建带图标的网站快捷方式
Delphi函数BuileLink用于在桌面创建带图标的网站快捷方式 Function BuileLink(Shortcutlink,Shortcutico:String;Shortcutname:PChar):boolean;begintry tmpObject := CreateComObject(CLSID_ShellLink);//创建建立快捷方式的外壳扩展 tmpSLink := tmpObject as IShellLink;//取得接口 tmpPFile..
2024-04-012024-04-01→ -
delphi操作注册表添加网站到信任站点及修改自定义级别安全设置
代码如下: Reg:=TRegistry.Create; Reg.RootKey := HKEY_CURRENT_USER; //修改注册表的SecureProtocols项值为2720以支持SSL3.0 TLS1.0 TLS1.1 TLS1.2 if Reg.OpenKey('SoftwareMicrosoftWindowsCurrentVersionInternet Settings',True) then begin Reg...
2024-04-012024-04-01→ -
inno setup制作的软件包安装前判断是否安装.NET FRAMEWORK4.0
[Code]function CheckDotNet4_0():boolean; begin if RegKeyExists(HKLM, 'SOFTWAREMicrosoft.NETFrameworkpolicyv4.0') and RegKeyExists(HKLM, 'SOFTWAREMicrosoftNET Framework SetupNDPv4Full') then //通过判断注册表看是否安装.NET4.0 begin Result:=..
2024-04-012024-04-01→ -
delphi窗体FORM添加背景图片
unit jmmh;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs;type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); procedure FormDestroy(Sender: TO..
2024-04-012024-04-01→ -
delphi按钮被点击后变灰色不能再被点击
delphi按钮被点击后变灰色不能再被点击,比如点安装后为防止多次点击安装按钮需要暂时把按钮状态转变为不能使用状态,就需要用到下面的代码!Button1.Enabled = false;..
2024-04-012024-04-01→ -
inno setup打包程序后RUN执行后不提示重启电脑代码
inno setup打包程序后RUN执行后不提示重启电脑代码,通过参看官方文档可知,如果想inno setup打包的程序安装完后不提示用户选择重启还是不重启电脑,只需要在[setup]中设置如下代码即可:RestartIfNeededByRun=no..
2024-04-012024-04-01→ -
Delphi 10.3.3 IDE字体变大的方法
觉得IDE字体小看着费力的朋友位可以一试。把以下内容复制到文本文件中并另存为 xxx.reg注册表文件,双击后,字体就变为10号。字体也可以根据需求修改为其它大小,方法为在注册表编辑器中找到 HKEY_CURRENT_USERSoftwareEmbarcaderoBDS20.0Them把 FontSize修改为十进制的大小即可[HKEY_CURRENT_USERSoftwareEmbarcaderoBDS20..
2024-04-012024-04-01→