Einzelnen Beitrag anzeigen

ghubi01

Registriert seit: 18. Nov 2017
133 Beiträge
 
Delphi 12 Athens
 
#8

AW: Ein Formular für alle Monitore, Hilfe bitte

  Alt 26. Aug 2020, 11:12
Hallo,
@Delphi.Narium

Ja, das funktioniert (zumindest hier bei mir).
Ich habe das mal folgendermaßen getestet:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
  Left:=Screen.DesktopLeft;
  Top:=Screen.DesktopTop;
  Height:=Screen.DesktopHeight;
  Width:=Screen.DesktopWidth;
  FormStyle:=fsStayOnTop;
end;

procedure TForm1.FormPaint(Sender: TObject);
begin
  Label1.Caption:='Left: ' + IntToStr(Left);
  Label2.Caption:='Top: ' + IntToStr(Top);
  Label3.Caption:='Height; ' + IntToStr(Height);
  Label4.Caption:='Width: ' + IntToStr(Width);
end;
HauptMonitor links: Left=0, Top=0, Height=1200, Width=3200
HauptMonitor rechts: Left= -1600, Top=0, Height=1200, Width=3200
  Mit Zitat antworten Zitat