Delphi-PRAXiS - Delphi Canvas Text mit transparentem Hintergrund

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)

- - Delphi Canvas Text mit transparentem Hintergrund (https://www.delphipraxis.net/89976-canvas-text-mit-transparentem-hintergrund.html)

Canvas Text mit transparentem Hintergrund

Hallo

ich habe so einene Text auf den Desktop gezeichnet

Delphi-Quellcode:

			var

DP: TCanvas;

begin

  DP := TCanvas.Create;

  DP.Handle := GetDC(0);

  DP.font.Height:=(40);

  DP.font.Name:=('Verdana');

  DP.font.Color:=(cllime);

  DP.font.Style:=[fsBold];

  DP.TextOut(round(Screen.width/2-150),round(Screen.height/2+Screen.height/4),'Laustärke :'+inttostr(100-round(100/72*Form2.Trackbar1.position))+' %');

  ReleaseDC(0, DP.Handle);

  DP.Handle := 0;

  DP.Free;

end;

jetzt ist aber um den Text ein weisses Viereck. Bekomme ich das weg oder transparent ?

MfG

Re: Canvas Text mit transparentem Hintergrund

Warscheinlich damit:

Delphi-Quellcode:

DP.Brush.Style:= bsClear;

Re: Canvas Text mit transparentem Hintergrund