From ba56fcb37708521051160053b40929f2845d8758 Mon Sep 17 00:00:00 2001
From: SPCLoong <479066371@qq.com>
Date: Mon, 16 Jun 2025 12:32:37 +0800
Subject: [PATCH] vault backup: 2025-06-16 12:32:37

---
 SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md b/SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md
index d52caa80..47407cf3 100644
--- a/SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md
+++ b/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;