Screen.WorkArea verändern

**Hazardos**

Guten Morgen @ all...

tja.. ich hab mir mal so eine Art erweiterte Taskleiste den subjektiven Ansprüchen nach zusammengebastelt.
Momentan läuft sie im fsStayOnTop-mode, verdeckt dabei jedoch einige Elemente anderer Fenster... bspw. Die Statusleiste beim Internetexplorer o.ä.. Um Dies zu verhindern würde ich gerne den Workarearect dahingehend verändern, sodass sich alle weiteren Fenster diesem Anpassen. Da die Screen.workarea-werte im read-only mode vorliegen, wüsste ich gerne mit welchem Befehl ich genau diese Werte verändern kann...

MfG Jörn

**marabu**

Eine Möglichkeit wäre die:

markieren

Delphi-Quellcode:

			var

  r: TRect;

begin

  r := Screen.WorkAreaRect;

  r.Bottom := r.Bottom - 50;

  SystemParametersInfo(SPI_SETWORKAREA, 0, @r, SPIF_SENDCHANGE);

end;

Grüße vom marabu

**sakura**

Das was Du basteln willst, dass nennt sich in Windows Hier im Forum suchen

AppBar,

AppBar Delphi, MSDN-Library durchsuchen

AppBar.

Wenn Du Dein Form als solche registrierst, dann übernimmt Windows den Rest für Dich

...

**core**

sorry falscher Beitrag...

Screen.WorkArea verändern

Screen.WorkArea verändern

Re: Screen.WorkArea verändern

Re: Screen.WorkArea verändern

Re: Screen.WorkArea verändern

Forumregeln

marabu Registriert seit: 6. Apr 2005 10.109 Beiträge	#2 Re: Screen.WorkArea verändern 29. Apr 2005, 09:26 Eine Möglichkeit wäre die: markieren Delphi-Quellcode: var r: TRect; begin r := Screen.WorkAreaRect; r.Bottom := r.Bottom - 50; SystemParametersInfo(SPI_SETWORKAREA, 0, @r, SPIF_SENDCHANGE); end; Grüße vom marabu
	Zitat

sakura Registriert seit: 10. Jun 2002 Ort: München 11.412 Beiträge Delphi 11 Alexandria	#3 Re: Screen.WorkArea verändern 29. Apr 2005, 09:33 Das was Du basteln willst, dass nennt sich in Windows AppBar, AppBar Delphi, AppBar. Wenn Du Dein Form als solche registrierst, dann übernimmt Windows den Rest für Dich ...... Daniel W. Ich bin nicht zurück, ich tue nur so
	Zitat

core Registriert seit: 26. Dez 2003 Ort: Wadgassen 29 Beiträge	#4 Re: Screen.WorkArea verändern 2. Jun 2007, 16:40 sorry falscher Beitrag...
	Zitat