From fb715c739e9fb69d00e727c864cf59d2a26b811d Mon Sep 17 00:00:00 2001 From: Erich Eckner Date: Wed, 18 Nov 2015 11:12:51 +0100 Subject: Fenster richtiger positioniert --- unit1.pas | 4 +-- wetter.lpi | 1 + wetter.lps | 114 ++++++++++++++++++++++++++++++------------------------------- 3 files changed, 60 insertions(+), 59 deletions(-) diff --git a/unit1.pas b/unit1.pas index 7b151b0..e38a5ad 100644 --- a/unit1.pas +++ b/unit1.pas @@ -176,8 +176,8 @@ end; procedure TForm1.FormShow(Sender: TObject); begin - form1.top:=screen.height-form1.height-24; - form1.left:=screen.width-form1.width; + form1.top:= screen.monitors[0].top +screen.monitors[0].height-form1.height-24; + form1.left:=screen.monitors[0].left+screen.monitors[0].width -form1.width; end; procedure TForm1.TrayIcon1Click(Sender: TObject); diff --git a/wetter.lpi b/wetter.lpi index 11f29d5..5eebeb5 100644 --- a/wetter.lpi +++ b/wetter.lpi @@ -62,6 +62,7 @@ + diff --git a/wetter.lps b/wetter.lps index 6563059..a710c84 100644 --- a/wetter.lps +++ b/wetter.lps @@ -9,7 +9,7 @@ - + @@ -18,9 +18,10 @@ - - - + + + + @@ -28,7 +29,7 @@ - + @@ -36,7 +37,7 @@ - + @@ -64,7 +65,7 @@ - + @@ -86,10 +87,9 @@ - - - + + @@ -111,124 +111,124 @@ - - + + - - + + - - + + - + - - + + - + - - + + - + - - + + - - + + - - + + - - + + - - + + - + - + - + - + - + - + - + - + - - + + - - + + - - + + - + - - + + - + - - + + - - + + - - + + -- cgit v1.2.3-70-g09d2