参考代码如下:
if Dialogs.MessageDlg('您是否真的删除该文件夹?', TMsgDlgType.mtConfirmation,[TmsgDlgBtn.mbYes, TmsgDlgBtn.mbNo], 0)= Business.Forms.Controls.mrYes then
begin
...
end ;
X3中对话框可分为三类:
Business.Forms.Dialogs
与delphi的ShowMessage相似
Business.Forms.jsDialogs
X3自己封装好的对话框,常用
Business.Forms.TBizSelectDialog->TBaseCommDlg
特殊对话框