From c1d018e4331573ae2846f36584fb04c061a50b00 Mon Sep 17 00:00:00 2001 From: genyakun Date: Sat, 31 Jul 2004 02:07:44 +0000 Subject: [PATCH] =?utf8?q?TabAutoSave/Load(AccessVolstionInclude=EF=BC=88?= =?utf8?q?=E7=AC=91))?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- Giko.dfm | 4 ++-- Giko.pas | 10 ++++++++++ 2 files changed, 12 insertions(+), 2 deletions(-) diff --git a/Giko.dfm b/Giko.dfm index e9bac65..4c440f8 100644 --- a/Giko.dfm +++ b/Giko.dfm @@ -1,6 +1,6 @@ object GikoForm: TGikoForm - Left = 80 - Top = 114 + Left = 246 + Top = 186 HorzScrollBar.Visible = False VertScrollBar.Visible = False AutoScroll = False diff --git a/Giko.pas b/Giko.pas index f35eb98..e650c7c 100644 --- a/Giko.pas +++ b/Giko.pas @@ -1625,6 +1625,11 @@ begin //Samba24‚̃tƒ@ƒCƒ‹ƒ`ƒFƒbƒN GikoSys.SambaFileExists(); + //ƒ^ƒuŽ©“®“ǂݍž‚Ý + if OptionDialog.TabAutoLoad.Checked then begin + TabsSaveActionExecute(Sender); + end; + end; // CoolBar ‚̐ݒè‚ð•Ï”‚É•Û‘¶ @@ -1794,6 +1799,11 @@ begin //Application.HookMainWindow(Hook); Application.UnhookMainWindow(Hook); Application.Terminate; + + if OptionDialog.TabAutoSave.Checked then begin + TabsOpenActionExecute(Sender); + end; + end; procedure TGikoForm.FormDestroy(Sender: TObject); -- 2.11.0