fix map options on win32

[d2df-editor.git] / src / editor / f_mapoptions.pas

diff --git a/src/editor/f_mapoptions.pas b/src/editor/f_mapoptions.pas
index a69c5cfbe434938855fc776c4c337f73bd4e52fb..22d74cc5f8d4699f50e8802ae9d3f2cc99b605e6 100644 (file)
--- a/src/editor/f_mapoptions.pas
+++ b/src/editor/f_mapoptions.pas
@@ -77,7 +77,7 @@ type
     bOK: TButton;
     bCancel: TButton;
     
-    procedure FormCreate(Sender: TObject);
+    procedure FormShow(Sender: TObject);
     procedure bCancelClick(Sender: TObject);
     procedure bOKClick(Sender: TObject);
 
@@ -122,7 +122,7 @@ begin
   Result := True;
 end;
 
-procedure TMapOptionsForm.FormCreate(Sender: TObject);
+procedure TMapOptionsForm.FormShow(Sender: TObject);
   var a, b: Integer;
 begin
   // General map options