Delphi-Quellcode:
DC := Canvas.Handle;
SetTextColor(
DC, ColorToRGB(Font.Color));
1.) das Canvas.handle in eine lokale Variable
DC: hDC zwischenspeichern. Canvas.Handle ist ein Property und macht intern viel mehr als nur ein
Handle zurückzugeben, es kommt beim ständigen Zugriff mit Canvas.Handle zu Inkonsistenzen.
2.) ColorToRGB() benutzen.
Gruß Hagen