delphi spSkinButton控件的onPaint事件,用png图片绘制透明效果的icon给Button显示
由于需要得到背景区域的Canvas,需要用到GetParentImage函数,所以需要引用SPUtils单元。下面是代码:procedure TfrmLogin.btnClosePaint(Sender: TObject; Cnvs: TCanvas; R: TRect; ADown, AMouseIn: Boolean; var DrawDefault: Boolean);var...
原创
2019-12-02 18:57:43 ·
494 阅读 ·
1 评论