Such big changes, require such big version changes. Simba 2000.

Author: ollydev

Source/forms/simba.main.lfm

@@ -13,7 +13,7 @@ object SimbaForm: TSimbaForm
   OnKeyDown = FormKeyDown
   OnWindowStateChange = FormWindowStateChange
   Position = poScreenCenter
-  LCLVersion = '3.0.0.1'
+  LCLVersion = '3.0.0.2'
   object DockPanel: TAnchorDockPanel
     Left = 0
     Height = 511
@@ -500,9 +500,9 @@ object SimbaForm: TSimbaForm
     object Separator1: TMenuItem
       Caption = '-'
     end
-    object MenuItemDownloadAnotherSimba: TMenuItem
-      Caption = 'Download Another Simba'
-      OnClick = MenuItemDownloadAnotherSimbaClick
+    object MenuItemDownloadSimba: TMenuItem
+      Caption = 'Download Simba ...'
+      OnClick = MenuItemDownloadSimbaClick
     end
   end
   object MainMenuView: TPopupMenu

Source/forms/simba.main.pas

@@ -67,7 +67,7 @@ interface
   TSimbaForm = class(TForm)
     DockPanel: TAnchorDockPanel;
     Images: TImageList;
-    MenuItemDownloadAnotherSimba: TMenuItem;
+    MenuItemDownloadSimba: TMenuItem;
     MenuItemSelectLine: TMenuItem;
     MenuItemSelectWord: TMenuItem;
     MenuItemFind: TMenuItem;
@@ -196,7 +196,7 @@   TSimbaForm = class(TForm)
     procedure MenuFileClick(Sender: TObject);
     procedure MenuFindClick(Sender: TObject);
     procedure MenuGotoClick(Sender: TObject);
-    procedure MenuItemDownloadAnotherSimbaClick(Sender: TObject);
+    procedure MenuItemDownloadSimbaClick(Sender: TObject);
     procedure MenuItemFindInFilesClick(Sender: TObject);
     procedure MenuItemSelectLineClick(Sender: TObject);
     procedure MenuItemSelectWordClick(Sender: TObject);
@@ -913,7 +913,7 @@ procedure TSimbaForm.MenuGotoClick(Sender: TObject);
   end;
 end;
 
-procedure TSimbaForm.MenuItemDownloadAnotherSimbaClick(Sender: TObject);
+procedure TSimbaForm.MenuItemDownloadSimbaClick(Sender: TObject);
 begin
   SimbaDownloadSimbaForm.ShowModal();
 end;