TBrush: eine Farbe immer schwarz?

FireFox-112 · Hält's aus hier Beiträge: 2

Hallo,
wenn ich eine TBrush mit color = clRed und Style = bsDiagCross erzeuge, dann bekomme ich ein caromuster, wo die Linien rot sind, der Hintergrund aber schwarz.
Wie kann ich die Hintergrund farbe auch ändern?

pen.color ändert schon mal nichts...

MfG
FireFox

Reinhard Kern · Beiträge: 591 Erhaltene Danke: 14

FireFox-112 hat folgendes geschrieben:

Hallo,
wenn ich eine TBrush mit color = clRed und Style = bsDiagCross erzeuge, dann bekomme ich ein caromuster, wo die Linien rot sind, der Hintergrund aber schwarz.
Wie kann ich die Hintergrund farbe auch ändern?

pen.color ändert schon mal nichts...

MfG
FireFox

Hallo,

da ist die Delphi-Umsetzung "Canvas" einfach unvollständig, und man muss auf das Windows-API zurückgreifen:

markieren

Delphi-Quelltext

1:
2:

SetBkColor (Canvas.Handle, ColorToRGB(clHighlight));
SetBkMode (Canvas.Handle, TRANSPARENT);

Details in der SDK-Hilfe.

Gruss Reinhard

FireFox-112 · Hält's aus hier Beiträge: 2

Vielen Dank.
Welche Header-Datei muss ich dazu einbinden?
Gruß
FireFox

Reinhard Kern · Beiträge: 591 Erhaltene Danke: 14

FireFox-112 hat folgendes geschrieben:

Vielen Dank.
Welche Header-Datei muss ich dazu einbinden?
Gruß
FireFox

Hallo,

soweit ich weiss Windows. Das steht aber nirgends explizit, weil die SDK-Hilfe Original MS ist und nicht auf Delphi angepasst, muss man sich alles selbst von C in Pascal übersetzen.

Gruss Reinhard

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme