48
Delphi 根据进程名称获取进程号:Function GetPID(_GetPID: String;): integer;varh: THandle;f: Boolean;lppe: TProcessEntry32;beginh := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);lppe.dwSize := SizeOf(lppe);f := Process32First(h, lppe); // lppe.szExeFile是进…
78
解决 Delphi 程序在不同操作系统中 ShellExecute 调用 Chrome.exe 偶尔无效的问题://需var 一个temp变量,用来接收打开外部程序的结果temp := ShellExecute(handle, open, chrome.exe,PChar(OpenUrl + SessionID), nil, SW_SHOWNORMAL);//若结果小于32则说明打开失败if temp …
118
Delphi 10.3 调试程序时弹出错误提示框:unable to create process:请求的操作需要提升。出现这个错误是因为 delphi 调试启动需要UAC权限。启动 Delphi 10.3 时需以管理员的身份运行,便可解决此问题。
57
delphi 捕捉异常 try except语句 和 try finally语句用法以及区别try//尝试执行{SomeCode} except//出错的时候执行, Except有特定的错误类型 {SomeCode} end; try//尝试执行{SomeCode} finally//无论如何都强制执行{SomeCode} end; 例:tryAge:=StrToInt(Edit1.Text);ShowMessa…
68
Delphi 下没有三元运算或三目运算。可用 StrUtils 单元和 Math 单元分别有一个 IfThen 函数进行编写。举例:StrUtils 单元和 Math 单元 分别有一个 IfThen 函数, 举例:unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Di…
289
Delphi 10.3 中安装程序自动升级插件AutoUpgrader_Pro_v5.2 的方法步骤:1、下载AutoUpgrader_Pro_v5.2,未下载可至《AutoUpgrader_Pro_v5.2 免费下载》获取插件,并解压。2、打开Delphi 10.3,打开项目:3、定位至 AutoUpgrader_Pro_v5.2 文件夹的 Sources 目录,并打开项目(…
121
Delphi 10.3 断点调试相关快捷键:【F8】执行执行点所在的源代码行,并停在下一个源代码行。【F7】跟踪执行点处的方法。【Shift + F7】移动执行点到程序源代码的下一行。【F4】运行程序,并且当程序执行到源代码当前行时暂停。【Ctrl + F2】无条件终止程序并返回Delphi IDE。【…
68
Delphi 中打开浏览器跳转网址链接网页的几种方法:1:用默认浏览器打开:uses shellapiprocedure TForm1.Button2Click(Sender: TObject);beginShellExecut(Application.Handle, nil, http://www.muzhuangnet.com, nil, nil, SW_SHOWNORMAL); end;2:用指定的浏览器打开(这里以…