2016年10月10日
窗体Showmedol 遇到的奇怪异常-->进阶问题
摘要： procedure SetTransparentForm (popupFrm:TForm;Color:TColor;AlphaBlendValue:Integer); var FrmTransparent: TFrmTransparentForm; begin if not Assigned(FrmTransparent) then FrmTransparent:=TFrmTrans... 阅读全文
posted @ 2016-10-10 11:49 海蓝7 阅读(298) 评论(0) 推荐(0) 编辑