FoxPopupForm
<p>FoxPopupForm是FoxUI提供的方便设计弹窗的单元
<strong>特性</strong>
1：采用DirectUI模式支持阴影和窗体透明</p>
<p>2：不抢占焦点，拥有PopupForm特性</p>
<p>3：支持组件叠加和布局和FoxUI组件无缝结合</p>
<p>4：方便使用 只需要新建窗体 把TForm改成TFoxPopupForm即可</p>
<p><strong>属性</strong></p>
<p>Alpha 窗体透明度设定</p>
<p>RounValue 窗体圆角设定</p>
<p>ShadowSet 阴影设定
ShadowWidth 阴影宽度
Color 阴影颜色
Visible 阴影是否可见</p>
<p>CaptionSet 标题设定
Font 标题字体
OffSetX 标题X方向偏移量
OffSetY 标题y方向偏移量
Height 标题高度
Color 标题颜色
Visible 标题是否可见</p>
<p>SkinSet 皮肤设定
Logo 窗体图标皮肤序号
Caption 窗体标题皮肤序号
Form 窗体皮肤序号
Back 窗体背景皮肤序号</p>
<p><strong>事件</strong>
OnBeforFormPaint 窗体绘制前触发</p>
<p>OnAfterFormPaint 窗体绘制后触发</p>
<p>OnPopupFormPaint 窗体绘制事件</p>
<p>OnFormGetColor 窗体背景颜色动态设定事件</p>
<p>OBorderGetColor 窗体边框颜色动态设定事件</p>
<p>OnDrawBack 绘制窗体背景图触发</p>
<p>OnCaptionGetColor 标题颜色动态设定事件</p>
<p>OnCaptionFontSelect 标题字体动态设定事件</p>
<p>OnFormUpdateRect 区域更新事件</p>
<p>OnFormAllowClose 动态控制窗体是否允许自动关闭</p>
<p><strong>方法</strong>
procedure Lock; //锁定刷新</p>
<p>procedure UnLock;//解锁刷新</p>
<p>procedure RefreshDirectForm;//刷新窗体</p>
<p>procedure AskFormUpdateRect(ARect:TRect); //更新窗体区域</p>
<p>function GetBuffer:TBitmap32;//获取窗体图</p>
<p>procedure RePaintForm;//重绘ddform窗体</p>
<p>procedure ShowPopupForm(x,y:Integer);//显示弹窗</p>
<p>function GetValueByDPI(Value:Integer):Integer; //高清dpi相关函数
function GetFontValueByDPI(Value:Integer):Integer;
function GetRectByDPI(Const Value:TRect):TRect;</p>
<p>Function GetClientRect(Actrl:TControl):TRect;//呼叫偶去组件相对区域</p>