Changeset 30 for trunk/UCore.pas

Timestamp:

Dec 23, 2016, 10:07:39 AM (8 years ago)

Author:

chronos

Message:

• Modified: Drawing and loading using bitmap rawimage improvement.

File:

• trunk/UCore.pas (modified) (2 diffs)

trunk/UCore.pas

@@ -43 +43 @@
     SavePictureDialog1: TSavePictureDialog;
     procedure AExitExecute(Sender: TObject);
+    procedure AFileNewExecute(Sender: TObject);
     procedure AFileCloseExecute(Sender: TObject);
     procedure AFileOpenExecute(Sender: TObject);
@@ -53 +54 @@
     procedure AImageNegativeExecute(Sender: TObject);
     procedure AImageRandomExecute(Sender: TObject);
-    procedure AFileNewExecute(Sender: TObject);
     procedure AZoomAllExecute(Sender: TObject);
     procedure AZoomInExecute(Sender: TObject);