Hallo Delphi-Gemeinde
Ich habe folgendes Problem:
Ich möchte bei meinem Projekt die Schriftfarbe in Abhängigkeit eines sich ändernden Parameters ändern.
Also in zum Beispiel so:
Delphi-Quellcode:
if PerfCounter.FPS>500 then
MainAdDraw.Canvas.Pen.Color := AdCol32_Red
else
MainAdDraw.Canvas.Pen.Color := AdCol32_Black;
MainAdDraw.Canvas.Rectangle(800,32,820,42);
MainAdDraw.Canvas.TextOut(785,32,'Hallo');
Die Sache ist nun die, dass sich bei dem Rechteck die Farbe des Randes ändert, wenn die FPS größer bzw. kleiner als 500 werden.
Bei dem Schriftzug ist dies allerdings nicht der Fall.
MfG
Spezi
PS: Ich rufe diesen Code zwischen "BeginScene;" und "EndScene;" auf, "Release;" habe ich auch schon probiert.