no need to load readme.txt

lazpaint/dialog/uabout.pas

@@ -49,13 +49,13 @@ type
     { public declarations }
   end;
 
-procedure ShowAboutDlg(AInstance: TLazPaintCustomInstance; {%H-}AText: string);
+procedure ShowAboutDlg(AInstance: TLazPaintCustomInstance);
 
 implementation
 
 uses LCLIntf, BGRABitmap, BGRABitmapTypes;
 
-procedure ShowAboutDlg(AInstance: TLazPaintCustomInstance; {%H-}AText: string);
+procedure ShowAboutDlg(AInstance: TLazPaintCustomInstance);
 var
   About: TFAbout;
 begin

lazpaint/lazpaint.lpr

@@ -213,12 +213,6 @@ begin
   LazpaintApplication.UseConfig(ActualConfig);
   FillLanguageList(LazpaintApplication.Config);
 
-  {$IFDEF WINDOWS}
-    LazpaintApplication.AboutText := ReadFileToString(SysToUTF8(ExtractFilePath(Application.ExeName))+'readme.txt');
-  {$ELSE}
-    LazpaintApplication.AboutText := ReadFileToString('readme.txt');
-  {$ENDIF}
-
   if not LazpaintApplication.ProcessCommandLine then
   begin
     LazpaintApplication.Show;

lazpaint/lazpaintinstance.pas

@@ -1298,7 +1298,6 @@ begin
         embeddedImageToBeFreed := true;
       end;
     end;
-    subLaz.AboutText := AboutText;
     subLaz.FMain.BorderIcons := subLaz.FMain.BorderIcons - [biMinimize];
     if AOnRun <> nil then
       AOnRun(subLaz);
@@ -2037,7 +2036,7 @@ procedure TLazPaintInstance.ShowAboutDlg;
 var tmi: TTopMostInfo;
 begin
   tmi := HideTopmost;
-  uabout.ShowAboutDlg(self,AboutText);
+  uabout.ShowAboutDlg(self);
   ShowTopmost(tmi);
 end;
 

lazpaint/lazpainttype.pas

@@ -218,7 +218,7 @@ type
 
     function GetMainFormBounds: TRect; virtual; abstract;
   public
-    Title,AboutText: string;
+    Title: string;
     EmbeddedResult: TModalResult;
     EmbeddedImageBackup: TBGRABitmap;