掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
imageにおいて、画像のないところを透明にしたい。 (ID：13530)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
取敢えず，以下のコードで透明にはなりまが，後は工夫して下さい． type TForm1 = class(TForm) Image1: TImage; procedure FormCreate(Sender: TObject); private procedure CreateParams(var Params: TCreateParams); override; { Private 宣言 } public { Public 宣言 } end; var Form1: TForm1; implementation {$R *.DFM} procedure TForm1.CreateParams(var Params: TCreateParams); begin inherited CreateParams(Params); Params.ExStyle := WS_EX_TRANSPARENT end; procedure TForm1.FormCreate(Sender: TObject); begin Form1.Brush.Style := bsClear; Form1.BorderStyle := bsNone; end; http://homepage2.nifty.com/Mr_XRAY/Halbow/VCL01.html#VChap1-7 な方法もあります ( List 9 )．
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.