LanHeron/WorkNote
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

vault backup: 2025-06-20 13:58:10

Browse Source
This commit is contained in:
SPCLoong
2025-06-20 13:58:10 +08:00
parent ba56fcb377
commit 1d5e5c6ec1
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md
View File

@ -496,7 +496,7 @@ end.
当要设置自定义分隔符号，要将==**StringList.Delimiter := '-'; // 设置分隔符为分号**==往前面放 当要设置自定义分隔符号，要将==**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; CHostIntf,ProductClas,DocClas,LoginClas,VirtualTrees,CEntClas,PathClas;
var var
StringList: TStringList; StringList: TStringList;