Cosmetic

main.lfm

@@ -1970,7 +1970,7 @@ object fmMain: TfmMain
       }
       OnClick = lmCompareClick
     end
-    object lmDBIndo: TMenuItem
+    object lmDBInfo: TMenuItem
       Caption = 'Database Info'
       Bitmap.Data = {
         36040000424D3604000000000000360000002800000010000000100000000100
@@ -2008,7 +2008,7 @@ object fmMain: TfmMain
         FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00B9BEBD36ABB0AEA0A1A6A4B09CA1
         9F51FFFFFF00FFFFFF00FFFFFF0019774A5A1D6C3B1AFFFFFF00
       }
-      OnClick = lmDBIndoClick
+      OnClick = lmDBInfoClick
     end
     object MenuItem8: TMenuItem
       Caption = '-'

main.lrs

@@ -2601,7 +2601,7 @@ LazarusResources.Add('TfmMain','FORMDATA',[
   +#157#218#220#219#255#220#222#221#254#220#221#221#254#220#221#221#254#220#221
   +#221#254#220#221#221#254#220#221#221#254#220#221#221#254#220#221#221#254#220
   +#221#221#254#220#221#221#254#218#220#219#255#185#188#187#157#0#0#0#2#7'OnCli'
-  +'ck'#7#14'lmCompareClick'#0#0#9'TMenuItem'#8'lmDBIndo'#7'Caption'#6#13'Datab'
+  +'ck'#7#14'lmCompareClick'#0#0#9'TMenuItem'#8'lmDBInfo'#7'Caption'#6#13'Datab'
   +'ase Info'#11'Bitmap.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0#0#0'6'#0#0#0
   +'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'#0#0#0#0#0#0
   +#0#0#0#0#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
@@ -2652,7 +2652,7 @@ LazarusResources.Add('TfmMain','FORMDATA',[
   +#138's'#144'$'#153'X'#250'$'#134'F'#226#29'b1'#26#255#255#255#0#255#255#255#0
   +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#185#190#189'6'#171
   +#176#174#160#161#166#164#176#156#161#159'Q'#255#255#255#0#255#255#255#0#255
-  +#255#255#0#25'wJZ'#29'l;'#26#255#255#255#0#7'OnClick'#7#13'lmDBIndoClick'#0#0
+  +#255#255#0#25'wJZ'#29'l;'#26#255#255#255#0#7'OnClick'#7#13'lmDBInfoClick'#0#0
   +#9'TMenuItem'#9'MenuItem8'#7'Caption'#6#1'-'#0#0#9'TMenuItem'#9'lmEditReg'#7
   +'Caption'#6#17'Edit Registration'#11'Bitmap.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4
   +#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'

main.pas

@@ -54,7 +54,7 @@ type
     lmCopyUserPermission: TMenuItem;
     lmViewFields: TMenuItem;
     lmEditField: TMenuItem;
-    lmDBIndo: TMenuItem;
+    lmDBInfo: TMenuItem;
     lmCopyRolePermission: TMenuItem;
     lmCompare: TMenuItem;
     lmGetIncrementGen: TMenuItem;
@@ -127,7 +127,7 @@ type
     procedure lmCopyUserPermissionClick(Sender: TObject);
     procedure lmCopyTableClick(Sender: TObject);
     procedure lmCreateDBClick(Sender: TObject);
-    procedure lmDBIndoClick(Sender: TObject);
+    procedure lmDBInfoClick(Sender: TObject);
     procedure lmDisconnectClick(Sender: TObject);
     procedure lmEditFieldClick(Sender: TObject);
     procedure lmGetIncrementGenClick(Sender: TObject);
@@ -475,7 +475,7 @@ begin
   mnCreateDBClick(nil);
 end;
 
-procedure TfmMain.lmDBIndoClick(Sender: TObject);
+procedure TfmMain.lmDBInfoClick(Sender: TObject);
 var
   ATab: TTabSheet;
   Title: string;