Moin,
ich bin gerade dabei 'ne Komponente umzumodeln. Problem dabei ist dass sich die Farbe der Caption des Panels nicht mit diesem Code ändern lässt.
Delphi-Quellcode:
// ...
SetTextColor(Canvas.Handle, Font.Color);
OldBkMode := SetBkMode(Canvas.Handle, TRANSPARENT);
DrawText(Canvas.Handle, PChar( Self.Caption), Length(Caption),
aRect, TextFlag);
SetBkMode(Canvas.Handle, OldBkMode);
// ...
Wenn ich bei
SetTextColor die Farbe direkt Angebe, also z.B. clRed wird das auch korrekt umgesetzt.
Font.Color enthält aber die akt. Farbe.
Habe ich was übersehen ?