FoxMsgBox
<p>FoxMsgbox，FoxUI提供的对话框组件
<strong>属性</strong>
Alpha 窗体透明度</p>
<p><del>Animate 窗体显示是否有动画</del>此属性已经有新的动画属性替代</p>
<p>HideStyle 窗体隐藏或者关闭时候动画</p>
<p>HideTime 窗体关闭动画时间 单位毫秒</p>
<p>ShowStyle 窗体显示时候动画</p>
<p>ShowTime 窗体显示动画时间 单位毫秒</p>
<p>BtnCationSet 按钮标题设置 注意此部分已经全部放到FoxCaptionHintManager统一管理
BtnAbort 终止
BtnAll 所有
BtnCancel 取消
BtnClose 关闭
BtnHelp 帮助
BtnIgnore 忽略
BtnNo 否
BtnNoToAll 取消所有
BtnOk 确定
Btnrety 重试
BtnYes 是
BtnYesToAll 全部是</p>
<p>Caption 标题</p>
<p>MinHeight 最低高度</p>
<p>MinWidth 最低宽度</p>
<p>InputEditLeft 输入对话框的输入框是否靠左</p>
<p>MsgSetting 消息设置
ShadowWidth 阴影尺寸
BtnCloseHint 关闭提示 //此属性已经删除 由FoxCaptionHintManager统一管理
BtnHeight 按钮高度<br />
BtnWidth 按钮宽度
MarginBtn 按钮间距
CaptionFont 标题字体
CaptionHeight 标题高度
LogoOffSetX 图标偏移
LogoOffsetY
CaptionOffSetX 标题偏移
CaptionOffsetY
Font 字体
Margin 间距 文字和图标直接间距
Padding 边距留空 此处指的的信息面板四周边距控制
BtnBoardHeight 按钮面板高度
BtnOffsetX 关闭按钮横向偏移
BtnOffsetY 关闭按钮竖向偏移
BtnRound 是否采用圆角按钮
BtnCenter 按钮是否在窗体中居中显示
ShowFcous 是否采用虚线画按钮边框
FormRound 窗体是否采用圆角
ShadowColor 阴影颜色
ShowBtnClose 是否显示关闭按钮
BtnReserve 按钮是否反方向绘制</p>
<p>SkinSet 皮肤管理
BtnClose 关闭按钮皮肤序号
BtnStd 标准按钮皮肤序号
Check 勾选框皮肤序号
Form 窗体皮肤序号
Logo 图标皮肤序号
MsgIco 消息图背景序号 注意消息图是合成的多ImgCount
如
<img src="https://www.showdoc.cc/server/api/common/visitfile/sign/0e3ca4bf2407addab1ca52551373f949?showdoc=.jpg" alt="" /></p>
<p><strong> 提供的事件</strong>
OnBtnOwnerDraw 按钮自绘事件</p>
<p>OnDrawBack 画背景图事件</p>
<p>OnFontSelect 文字输出可以自定义的字体</p>
<p>OnInitCheckInfo 带勾选框的时候可以定义默认状态</p>
<p>OnBtnBoardColorSelect 按钮面板颜色动态设置</p>
<p>OnBtnBorderSelect 按钮边框颜色选择</p>
<p>OnBtnColorSelect 按钮颜色选择</p>
<p>OnBtnFontSelect 按钮字体选择事件</p>
<p>OnFormColorSelect 窗体颜色选择事件</p>
<p>OnCaptionColorSelect 标题颜色选择事件</p>
<p>OnInitMsgForm 初始化消息窗体事件</p>
<p>OnMsgInfoOwnerDraw 消息内容样式自定义输出</p>
<p>OnMsgGetImgIndex 动态设置消息图标事件</p>
<p>OnMsgGetCaption 动态设定标题事件</p>
<p>OnAutoShowHintStyle AutohideMsg的窗体特性采用了组合 记住动画时间采用的是组件的
Showtime hidetime</p>
<p><strong>提供的方法</strong>
procedure RefrushHintForm;//刷新提示窗体</p>
<p>Procedure RefrushMsgForm;//刷新消息窗体</p>
<p>//输入提示框
function InputBox(Title:string;Prompt:string;var Ainput:String;Aleft:Integer=-1;ATop:Integer=-1):integer;</p>
<p>//对话框 具体看参数
Function MsgDlg(Title:String;Msg:string;DlgType:TMsgDlgType;Buttons:TMsgDlgButtons;CheckInfo:string='';Aleft:Integer=-1;ATop:Integer=-1):Integer;</p>
<p>//显示提示框
procedure ShowMessageBox(Msg:String;CheckInfo:string='';Aleft:Integer=-1;ATop:Integer=-1);</p>
<p>//自动提示框
procedure AutoHideMsg(msg:String;FormColor,BorderColor,ShadowColor:TColor;DlgType:TMsgDlgType=mtInformation;PauseTime:Integer=2000;Aleft:Integer=-1;ATop:Integer=-1);</p>