bug fixes

RetroNick2020 · Apr 9, 2023 · a1930d9 · a1930d9
1 parent faa8d95
commit a1930d9
Show file tree

Hide file tree

Showing 6 changed files with 174 additions and 142 deletions.
diff --git a/fileprops.lfm b/fileprops.lfm
@@ -47,7 +47,7 @@ object FileProperties: TFileProperties
     Height = 19
     Top = 80
     Width = 165
-    Caption = 'Fuschia (R=255 G=255 B=0)'
+    Caption = 'Fuschia (R=255 G=0 B=255)'
     Checked = True
     OnChange = ValueChange
     State = cbChecked

diff --git a/rm.lpi b/rm.lpi
@@ -283,6 +283,7 @@
         <Filename Value="fileprops.pas"/>
         <IsPartOfProject Value="True"/>
         <ComponentName Value="FileProperties"/>
+        <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
       </Unit28>
     </Units>

diff --git a/rmabout.pas b/rmabout.pas
@@ -8,7 +8,7 @@ interface
   Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, ExtCtrls,lclintf;
 
 Const
-  ProgramName ='Raster Master v1.4 R78';
+  ProgramName ='Raster Master v1.4 R79';
   ProgramLicense = 'Released under MIT License';
 
 type

diff --git a/rmmain.pas b/rmmain.pas
@@ -3369,6 +3369,8 @@ procedure TRMMainForm.EditPasteClick(Sender: TObject);
  GetOpenSaveRegion(x,y,x2,y2);
  RMDrawTools.Paste(x,y,x2,y2);
 
+ ImageThumbBase.CopyCoreToIndexImage(ImageThumbBase.GetCurrent);
+
  UpdateActualArea;
  UpdateZoomArea;
  UpdateThumbView;