Setzen der Farbe zuoberst im Fenster ?

Hochhaus · Beiträge: 662 Erhaltene Danke: 8 Windows 7 Delphi XE2

Hallo allerseits !

wie kann man die Fensterfarbe zuoberst in der Umrandung eines Fensters setzen ? Kann man das unter Delphi überhaupt - oder geht die Auswahl nur in der Windows-Systemsteuerung / Anzeige ?

Danke für jede Antwort !

Hochhaus

Einloggen, um Attachments anzusehen!

jaenicke · Verfasst: Mo 09.06.14 09:08

Mit SetSysColors solltest du weiterkommen. ;-)

msdn.microsoft.com/e...esktop/ms724940.aspx

Hochhaus · Beiträge: 662 Erhaltene Danke: 8 Windows 7 Delphi XE2

Aber setzt das die Fensterfarben nicht im gesamten System ? Ich möchte nur andere Farben in meinem Programm ... !

Hochhaus

WasWeißDennIch · Beiträge: 653 Erhaltene Danke: 160

Such doch mal nach WM_NCPAINT, damit müsste es gehen.

Martok · Verfasst: Mi 11.06.14 09:54

WasWeißDennIch hat folgendes geschrieben :

Such doch mal nach WM_NCPAINT, damit müsste es gehen.

Jupp, Windows malt das mit den im Design eingestellten Daten. Wenn du etwas anderes möchtest, musst du die NonClient-Area selber malen. "Drübermalen" genau genommen, das Windows-eigene Handling passiert, bevor die Message gesendet wird.

_________________
"The phoenix's price isn't inevitable. It's not part of some deep balance built into the universe. It's just the parts of the game where you haven't figured out yet how to cheat."

WasWeißDennIch · Beiträge: 653 Erhaltene Danke: 160

Exakt, ein Beispiel von vielen findet sich z.B. hier: delphi.about.com/od/.../draw_captionbar.htm

P.S.: Nenn mich bitte nicht Jupp :lol:

Hochhaus · Beiträge: 662 Erhaltene Danke: 8 Windows 7 Delphi XE2

Danke für das Beispiel !!

Hochhaus

Martok · Verfasst: Mi 11.06.14 14:06

WasWeißDennIch hat folgendes geschrieben :

P.S.: Nenn mich bitte nicht Jupp :lol:

Okay, dann nenne ich dich ab sofort "Jo". :mrgreen:

_________________
"The phoenix's price isn't inevitable. It's not part of some deep balance built into the universe. It's just the parts of the game where you haven't figured out yet how to cheat."

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme