Entwickler-Ecke

Multimedia / Grafik - Hintergrund bei Canvas.Textout auf transparent setzen


[r2d2] - Mi 12.11.03 20:22
Titel: Hintergrund bei Canvas.Textout auf transparent setzen
Hi
Wenn man mit Canvas.textout einen Text in ein Bild schreibt, wird der Bereich, in dem der Text steht, weiß. Wie kann man das abstellen, damit nur der Text in die Bitmap geschreiben wird?


MSCH - Mi 12.11.03 21:05

mir ist bei der VCL keine Möglichkeit bekannt, allerdings bei Verwendung der API gehts.
statt Cavas.Textout(...)

schreibe
MyRect ist ein TRect wo die Ausgabe erfolgen soll und S ist ein String

Delphi-Quelltext
1:
2:
3:
4:
5:
with Canvas do begin
          SetBkMode(Handle,TRANSPARENT);
          SetTextColor(Handle,clWhite); // Textfarbe !!
          DrawText(Handle,@s1[1],length(s1),MyRect,dt_left);
end


grez
msch


Anonymous - Mi 12.11.03 21:55

wie wärs mit


Delphi-Quelltext
1:
canvas.brush.style := bsClear;                    


?


[r2d2] - Mi 12.11.03 23:58

:D Danke