From 1d5e5c6ec15772f5b3a68c8d21acd9b3781c2fe9 Mon Sep 17 00:00:00 2001 From: SPCLoong <479066371@qq.com> Date: Fri, 20 Jun 2025 13:58:10 +0800 Subject: [PATCH] vault backup: 2025-06-20 13:58:10 --- SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md b/SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md index 47407cf3..d473d4a6 100644 --- a/SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md +++ b/SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md @@ -496,7 +496,7 @@ end. 当要设置自定义分隔符号,要将==**StringList.Delimiter := '-'; // 设置分隔符为分号**==往前面放 -```uses MyClass,Variables,BaseUtil,CommonFunc,DataConst,CFFrm,CFSimplePropFrm,Forms,StdCtrls,Variants,SysUtils,Classes,Controls,Dialogs, +uses MyClass,Variables,BaseUtil,CommonFunc,DataConst,CFFrm,CFSimplePropFrm,Forms,StdCtrls,Variants,SysUtils,Classes,Controls,Dialogs, CHostIntf,ProductClas,DocClas,LoginClas,VirtualTrees,CEntClas,PathClas; var StringList: TStringList;