From 61e8604818ab9875f0744faecad2b502aa339415 Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Thu, 11 Oct 2018 09:00:21 +0200
Subject: unit1.pas: Fnester zentrieren

---
 unit1.pas | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/unit1.pas b/unit1.pas
index cf26780..e8132be 100644
--- a/unit1.pas
+++ b/unit1.pas
@@ -52,6 +52,8 @@ begin
   {$IFDEF DEBUG}
   writeln('application.createForm(tForm2, form2);');
   {$ENDIF}
+  form2.left:=(screen.width-form2.width) div 2;
+  form2.top:=(screen.height-form2.height) div 2;
   case form2.showmodal of
     mrBuchstabenraetsel:
       raetsel:=tBuchstabenRaetsel.create(form1);
@@ -64,6 +66,8 @@ begin
     end;
   end;
   raetsel.onSetCaption:=@onSetCaption;
+  left:=(screen.width-width) div 2;
+  top:=(screen.height-height) div 2;
 end;
 
 procedure tForm1.onSetCaption(c: string);
-- 
cgit v1.2.3-70-g09d2