Hi!
Wenn ich Text auf ein TImage (Canvas) ausgebe, wird
der Bildhintergrund weiss.
Wie kann ich den Bildhintergrund transparent behalten?
Folgender Code funktioniert nicht:
(und alle Varianten davon, einmal den Brush.Style setzen,
einmal nicht, usw...)
Delphi-Quellcode:
Image1.Canvas.Pen.Color := clBlack;
SetBkMode(Image1.Canvas.Handle, TRANSPARENT);
Image1.Canvas.Brush.Style := bsClear;
Image1.Canvas.TextOut(2, 3, 'Test');
Auch die Transparent Eigenschaft beim TImage auf True zu setzen hilft nichts.