Delphi 通用 Hook 库
摘要：支持对API进行hook，或者对某一地址进行hook的功能单元。
阅读全文
posted @ 2022-08-30 15:24
08 2022 档案
Delphi 中constructor、destructor、property关键字的用法
摘要：记录构造函数，析构函数、属性在类中的用法。
阅读全文
posted @ 2022-08-29 22:45
Delphi 中的换行符sLineBreak
摘要：记住sLineBreak比记住#13#10更容易，以后就用它了。
阅读全文
posted @ 2022-08-24 21:51
Delphi 常用关键字收录
摘要：Delphi编程中的一些关键字，时而遇到时而忘记，特别是些不常用的，统一收录下来以备日后查看。
阅读全文
posted @ 2022-08-24 16:01
Delphi 内存流与字符串之间互相转换
摘要：测试程序的时候，急需要查看内存流中的内容，有了互传函数就方便的多。
阅读全文
posted @ 2022-08-23 18:59
Delphi 十六进制，十进制，字符串之间的类型转换
摘要：直接封装类型转换函数，加快平时编程的速度。
阅读全文
posted @ 2022-08-23 13:28
解决Delphi传stream参数时出现Stream read error错误提示
摘要：传参之前让Position =0
阅读全文
posted @ 2022-08-23 12:29
Delphi 防止程序重复执行的单元
摘要：直接引用MultInst单元就可以实现防止多开，免去了自己每次都要花时间写互斥对象代码
阅读全文
posted @ 2022-08-18 10:33
Delphi 让Listview中的item可以显示不同的颜色
摘要：在ListViewAAdvancedCustomDrawItem消息函数中根据Item.SubItems[0]来制定颜色。
阅读全文
posted @ 2022-08-16 21:52
解决Delphi中屏幕闪烁的问题
摘要：覆盖掉CreateParams函数，继承父类同名函数之后在加上Params.ExStyle := 33554432;
阅读全文
posted @ 2022-08-15 15:31
解决安装某些msi软件包提示“This advertised application will not be installed because it might beunsafe. Contact your administrator to change the installation userinterface option of the package to basic”
摘要：解决某些msi软件包无法安装的问题。
阅读全文
posted @ 2022-08-11 18:35
解决直接打开bpg工程组文件后提示PROJECTS macro in project group file missing or incorrect丢失错误
摘要：前言： 所谓.bpg文件就是指在delphi中能一次性打开多个.dpr的工程组文件（Borland Project Group File）。 出错环境： Win7-64+Delphi7.0 出错界面： 解决方案： 遇到这种错误一般都是打开别人的源码才会出现的，用记事本打开bpg文件发现换行混乱。一般
阅读全文
posted @ 2022-08-11 18:30
Delphi 获取程序运行路径函数GetSelfPath
摘要：function GetSelfPath: string; var ModuleName: string; i: Integer; begin SetLength(ModuleName, 255); GetModuleFileName(HInstance, PChar(ModuleName), Le
阅读全文
posted @ 2022-08-11 17:26
Delphi 开机自动启动函数SetAutoRun
摘要：转载自：https://blog.csdn.net/listest/article/details/121272294 procedure SetAutoRun(isRun: Boolean); var oAutoRunRegister: TRegistry; begin oAutoRunRegis
阅读全文
posted @ 2022-08-11 17:25
Delphi 设置时间格式函数SetSysDateFormat
摘要：转载自：https://blog.csdn.net/Listest/article/details/122942761 在时间转字符串的时候特别好用，有的系统的时间格式不一样， 产生的字符串也不一样，我们处理字符串的时候可能会出错， 直接给他统一一种格式，免去手动去设置的痛苦 procedure S
阅读全文
posted @ 2022-08-11 17:25
Delphi 生成随机汉字函数GenerateChineseWords
摘要：根据c#改编而来，很多年了。 function GenerateChineseWords(count: integer): string; var i: integer; regionCode, positionCode: integer; regionCode_Machine, positionC
阅读全文
posted @ 2022-08-11 17:23
Delphi 生成随机字符串函数RandomStr
摘要：可以生成自定义长度的随机字符串，字符串可以是大小写字母、数字或者是他们的混合。 function RandomStr(StrLength: Integer; Lowercase: Boolean = True; Number: Boolean = True; Uppercase: Boolean =
阅读全文
posted @ 2022-08-11 17:22
Delphi 更改扩展名函数ChangeFileExt
摘要：function ChangeFileExt(const FileName, Extension: string): string; var I: Integer; begin I := LastDelimiter('.' + PathDelim + DriveDelim,Filename); if
阅读全文
posted @ 2022-08-11 17:18
Delphi 实现无标题栏覆盖整个屏幕(适合屏保)
摘要：Delphi 实现无标题栏，覆盖整个屏幕，这个在做工控机或屏保时或者做护眼保护程序时有用，所以记下 procedure TForm1.FormCreate(Sender: TObject); begin with Form1 do begin Top := 0; Left := 0; BorderS
阅读全文
posted @ 2022-08-09 10:39
Delphi 简化版拼音反查单元
摘要：获取汉字的拼音，但是对多音字没有处理好！来源于网络 unit IMCode; (* 简化版拼音反查单元 修改于 Trueway(TM) LiQunwei 修改者 2ccc.com ZhongWan 修改内容 去掉外挂字典，简化代码 *) interface //iMode为1生成完成拼音 为2生成拼
阅读全文
posted @ 2022-08-08 22:47
Delphi中的冷门知识积累
摘要：前言 平时在Delphi编程的过程中，经常会有一些模棱两可的概念，似懂非懂。有的冷门知识当时通过搜索引擎学会了，可用不了几个月又全忘光，第二次出现又得重新学习。这里对平时遇到的冷门知识点做一个记录汇总，方便日后查看。 1、assert函数的用法 函数原型：procedure Assert(expr
阅读全文
posted @ 2022-08-01 19:03
Delphi adsl自动拨号的两种方法
摘要：1.利用rasphone.exe 这里直接贴一个断网、联网更换ip的函数，虽然简陋但是还算稳定。 procedure ChangeIp(ConnName: string; Delay1, Delay2: Integer); begin winexec(PChar('rasphone -h "' +
阅读全文
posted @ 2022-08-01 17:30
