排序
EhLib中的DBGridEh用自带的导出Excel功能时,会遇到Office Excel打不开的问题
经常,通过DBgrideh自带的导出Excel过程,会出现下面问题 解决方案:找到函数的Pas入口文件pas 添加以下正则表达式TRegEx.Replace(CcozlsBATNO.AsString,'[\x00-\x09|\x0B|\x0C|\x0E-\x1F]','...
XLSReadWriteII 6.02.01 (29 Nov 2024) for D7 – D12.2
XLSReadWriteII 6.02.01 (29 Nov 2024) for D7 - D12.2
Delphi 将方法以参数的形式传递
RAD Studio 10.2.3 测试√ 代码:procedure TForm_Tips.Button_ParamIsFuncClick(Sender: TObject); type // 需要先声明一个方法的类型 TFuncType = function(ANum: Integer): Integer; func...
Delphi TstringList Stringlist的特殊用法
procedure TForm1.btn1Click(Sender : TObject); var m : Integer; s : string; strlst : TStringList; begin strlst := TStringList.Create; strlst.Add('张三=80'); strlst.Add('张四=90'); s...
delphi实现post请求
delphi实现post请求,前提头部先引用IDHttp组件ContentType := ‘application/x-www-form-urlencoded’;var fhttpRequest: TIdHTTP; PostData : TStringStream; tmpStr : String; begin fhttpRe...
DeepSeek 介绍及对外国的影响
DeepSeek 简介DeepSeek(深度求索)是一家专注实现 AGI(人工通用智能)的中国科技公司,2023 年成立,总部位于杭州,在北京设有研发中心。与多数聚焦具体应用(如人脸识别、语音助手)的 AI 公...
Delphi医保接口 【1318】医保目录限价信息查
这个限价不停的更新就需要不停的下载,怎么保证最新呢,只能下载后在sql上想办法。分组取最新日期,其他条件可以自己加。Select * FROM ( SELECT t.*, ROW_NUMBER() OVER (PARTITION BY HILIST_...
delphi tcolor 颜色 转成 网页颜色 格式
procedure TForm3.ToolButton9Click(Sender: TObject); // 字体颜色 function ColorToHtml(DColor:TColor):string; var //delphi tcolor 颜色 转成 网页颜色 格式 tmpRGB : TColorRef; begin tm...
视频解说+例子:Make Runtime Crypter In Delphi
原链接来自油管,为方便国内无法访问的朋友,视频已下载到附件里了。附例子都可以在D12里边成功编译。 备注:Crypter Stub里边的程序会被杀毒程序报警,测试时要事先加入白名单。链接:https://...
获取文件中的图标
//作者:渣渣皮根据淡淡的风大佬写的代码基础上完善的 2025.02.21更新感谢:淡淡的风 Procedure TForm1.Button1Click(Sender: TObject); Var IconHandle: HICON; Icon: TIcon; IconIndex: Inte...
【函数】获取进程中的图标
//作者:渣渣皮在网上的代码基础上完善的 2025.02.21感谢未知的作者Function GetProcessIDIcon(ProcessID: String; w: Word = 0): HICON;//根据进程ID获取图标 Var hProcess: THandle; FileName:...
如何在没有DCP的情况下调用BPL里的对象方法?(上)
原创:刘啸 CnPack开发组在理解并回答题目里的问题之前,我们先回顾一下Delphi的带包编译的背景知识。熟悉Delphi编译特点的程序员都知道,Delphi的编译不仅速度快,而且能将所需的纯Pascal...
如何在设计时获取自定义控件 TComponent 所在的 DFM 文件路径
在 Delphi 中,设计时获取自定义 TComponent 所在的 .dfm 或 .pas 文件路径是一个常见的需求。以下是实现这一功能的简要步骤和代码示例。 在自定义 TComponent 中,需要在设计时获取其...
如何在 Delphi 中使用现代 CPU 指令(Java 比 Delphi 更快?)
/在 Delphi 中,默认的编译器并未充分利用现代 CPU 的指令集(如 SSE、AVX 等),导致在某些情况下,Java 的性能甚至超过了 Delphi。尤其是在浮点运算密集型任务中,Delphi 的表现较差。原因分...
输入框中只能输入数值,不能是英文或其它
在业务场景中我们需要录入年级,月份、年份等信息只能是正整数不能负数或者其它,我们对相应控件的KeyPress事件进行编写Key的约束就可以了;procedure TForm2.edt1KeyPress(Sender: TObject;...
Delphi 根据函数名字运行函数
在Delphi中,你可以使用RTL(运行时库)中的函数 GetProcAddress 来根据函数名称运行函数。这个函码可以在 SysUtils 单元中找到。以下是一个简单的例子,演示如何根据函数名称调用一个动态...
Delphi语言的正则表达式
引言随着信息技术的快速发展,数据处理已经成为我们工作和生活中不可或缺的一部分。正则表达式(Regular Expression,简称Regex)是一种强大的文本处理工具,广泛应用于字符串查找、替换、验证...