Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Prism Automatische Bildanpassung (https://www.delphipraxis.net/71176-automatische-bildanpassung.html)

daredd 10. Jun 2006 10:03


Automatische Bildanpassung
 
Tag Leute,
wie kann ich es so machen das sich mein Programm, das ich schreibe, im Vollbildmodus öffnet, sprich das sich das Programm der Bildschirmauflösung automatisch anpasst??
Weil zur Zeit seh ich immer noch die Taskleiste wenn ich mein aufgeht.
:dancer2:

Mokuba01 7. Feb 2008 20:06

Re: Automatische Bildanpassung
 
Das haben wir zwar schon mehrfach durchgekaut aber naja...

Delphi-Quellcode:
procedure TForm1.Vollbild;
var
  HTaskbar: HWND;
  OldVal: LongInt;
begin
oldW := Width;
oldH := Height;
oldX := Left;
oldY := Top;
BorderStyle := bsNone;
FormStyle  := fsStayOnTop;
Left       := 0;
Top        := 0;
Height     := Screen.Height;
Width      := Screen.Width;
end;
Und rückgängig:

Delphi-Quellcode:
procedure TForm1.Normalmodus;
var
  HTaskbar: HWND;
  OldVal: LongInt;
begin
BorderStyle := bsSizeable;
FormStyle  := fsNormal;
Left       := oldX;
Top        := oldY;
Height     := oldH;
Width      := oldW;
end;
folgende Variabeln müssen global deklariert werden:
oldX
oldY
oldH
oldW

Ich hoffe dass ich dir helfen konnte...
Gruß Mokuba01

Matze 8. Feb 2008 05:05

Re: Automatische Bildanpassung
 
Hallo,

die Frage ist ganz schön alt (10.06.2006). ;)
Der Thread-Ersteller hat als Sprache jedoch Delphi (.NET) angegeben und kein Win32, was dein Source jedoch wäre, Mokuba01. Es kann natürlich sein, dass sich der Autor geirrt hat. Ich vermute auch, dass sich das Problem mittlerweile geklärt hat, doch daredd ist ja noch aktiv in der DP und kann uns sicher aufklären. :)

Grüße


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:08 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz