vault backup: 2025-06-16 12:32:37

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

@@ -493,11 +493,10 @@ 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;
 var 
   StringList: TStringList;