Changeset 4 for trunk/Forms/UFormMain.lfm

Timestamp:

Sep 16, 2014, 11:55:35 AM (10 years ago)

Author:

chronos

Message:

• Added: Action to fill image with random image.
• Fixed: Pixel load/save to bitmap was using Move with pointers instead pointed value.

File:

• trunk/Forms/UFormMain.lfm (modified) (3 diffs)

trunk/Forms/UFormMain.lfm

@@ -5 +5 @@
   Width = 920
   Caption = 'LibrePaint'
-  ClientHeight = 611
+  ClientHeight = 614
   ClientWidth = 920
   Menu = MainMenu1
@@ -11 +11 @@
   object PaintBox1: TPaintBox
     Left = 0
-    Height = 611
+    Height = 614
     Top = 0
     Width = 920
@@ -35 +35 @@
         Action = Core.AImageClear
       end
+      object MenuItem6: TMenuItem
+        Action = Core.AImageRandom
+      end
     end
   end