From 6385b6300fd0d9b5838151ede20f66ee57922756 Mon Sep 17 00:00:00 2001
From: csh <caoshenghui@tinysoft.com.cn>
Date: Thu, 21 Nov 2024 10:27:56 +0800
Subject: [PATCH] =?UTF-8?q?=E6=9B=B4=E6=96=B0=E5=9F=BA=E7=A1=80=E7=BB=84?=
 =?UTF-8?q?=E4=BB=B6?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 utils/TSComponentsBase.tsf | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/utils/TSComponentsBase.tsf b/utils/TSComponentsBase.tsf
index 259348a..6eb69b3 100644
--- a/utils/TSComponentsBase.tsf
+++ b/utils/TSComponentsBase.tsf
@@ -4,6 +4,8 @@ public
     function Init();virtual;
     function InitZip(zip: ZipFile);
     function OpenFile(alias: string; file: string; password: string): tableArray;
+    function Save(): tableArray;
+    function SaveAs(alias: string; file: string): tableArray;
     function Zip(): ZipFile;
 
 protected
@@ -34,6 +36,16 @@ begin
     return zipfile_.Open(alias, file, password);
 end;
 
+function TSComponentsBase.Save(): tableArray;
+begin
+    return zipfile_.Save();
+end;
+
+function TSComponentsBase.SaveAs(alias: string; file: string): tableArray;
+begin
+    return zipfile_.Save(alias, file);
+end;
+
 function TSComponentsBase.Zip(): ZipFile;
 begin
     return zipfile_;