文字の背景を透過するには?

解決


JILL  2005-11-06 22:22:08  No: 18484  IP: 192.*.*.*

Canvas.TextOutで文字を描画するときに
文字以外の部分を透過させるにはどうすればいいのでしょうか?

編集 削除
junki  2005-11-06 22:33:53  No: 18485  IP: 192.*.*.*

TextOut の背景はブラシです。

procedure TForm1.Button1Click(Sender: TObject);
begin
  Canvas.Brush.Color := clYellow;
  Canvas.Brush.Style := bsClear; //これで透過
  Canvas.TextOut(10,10,'Test');
end;

編集 削除
JILL  2005-11-06 22:39:35  No: 18486  IP: 192.*.*.*

できました。ありがとうございました。

編集 削除