From 290860bea431e14494209e66d330722fcebd74a8 Mon Sep 17 00:00:00 2001
From: SeedList <lanmeredith.study@outlook.com>
Date: Fri, 20 Jun 2025 09:59:44 +0800
Subject: [PATCH] vault backup: 2025-06-20 09:59:44

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

diff --git a/SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md b/SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md
index b681323f..ec49787f 100644
--- a/SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md
+++ b/SanPinPLM/相关操作/4.0-other/999.Delphi脚本记录.md
@@ -533,6 +533,10 @@ end.
 那么对此可以采用另一种拼接方式，直接将字符串与字符串拼接起来，不再使用 `StringList` 记录再转化
 
 ```Delphi
+uses 
+  MyClass, Variables, BaseUtil, CommonFunc, DataConst, CFFrm, CFSimplePropFrm, 
+  Forms, StdCtrls, Variants, SysUtils, Classes, Controls, Dialogs,
+  CHostIntf, ProductClas, DocClas, LoginClas, VirtualTrees, CEntClas, PathClas;
 var
   TempStr: string;
 begin