1
0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-21 08:45:06 -05:00
Raymond 2011-02-17 19:41:24 +01:00
parent 25ad9b2dd5
commit 01b382134d
2 changed files with 4 additions and 2 deletions

View File

@ -15,7 +15,7 @@ object SimbaForm: TSimbaForm
OnDropFiles = FormDropFiles
OnHide = doOnHide
OnShortCut = FormShortCuts
LCLVersion = '0.9.29'
LCLVersion = '0.9.31'
Visible = True
object ToolBar1: TToolBar
Left = 0

View File

@ -3063,9 +3063,11 @@ begin
if CurrScript.ScriptChanged then
begin;
CurrTab.TabSheet.Caption:= CurrScript.ScriptName + '*';
Self.Caption := Format(WindowTitle,[CurrScript.ScriptName + '*'])
Self.Caption := Format(WindowTitle,[CurrScript.ScriptName + '*']);
ActionSaveScript.Enabled:= True;
end else
begin;
ActionSaveScript.Enabled:= False;
CurrTab.TabSheet.Caption:= CurrScript.ScriptName;
Self.Caption := Format(WindowTitle,[CurrScript.ScriptName]);
end;