請教各位前輩 那有 Label 可加入 圖片 的 VCL 元件?? 最好有Mous Out 事件,沒有自己寫也可以啦!!    謝謝各前輩    < >< >< >< >

放一個 TImage 元件就可以了.. TImage 的 Canver 屬性可以 "畫字", 畫字的方法其實跟你的 Label 方法一模一樣， 這樣就完全達到你的要求了.

http://www.almdev.com BussinessSkinForm 或DynamicSkinForm 裡的bsSkinButtonLabel 即可達成 我想很多SkinForm 元件應該都可達成你的要求 almdev有提供試用版你可下載試試 買了一套雖然有點貴 但是效果還不錯你可以考慮看看 搞不懂!搞不懂!永遠都搞不懂!!

jeffreck您好...不知道這個是不是您要的 < src="http://delphi.ktop.com.tw/loadfile.php?TOPICID=18617253&CC=416367"> 如果是...以下是程式碼 < class="code"> implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin Image1.Canvas.Font.Color:=clblue; Image1.Canvas.Font.Size:=9; Image1.Canvas.Font.Name:='標楷體'; Image1.Canvas.TextOut(5,10,'這不是透明文字'); Image1.Canvas.Font.Color:=clwhite; Image1.Canvas.Brush.Style:=bsClear; Image1.Canvas.TextOut(10,30,'這是透明文字'); end; end. 試試吧.. =程式是一種藝術 也是訓練自己的分析規劃= =是段落分明 或是雜亂無章= =是一言以敝 或是廢話連篇= =是一目了然 或是艱深難懂= 體會這份藝術 您會了解另一份喜悅與成就