1,072
社区成员
发帖
与我相关
我的任务
分享
string ls_pic, ls_cb
int value
// 图标选择
if rb_infomation.checked = true then
ls_pic="Infomation!"
elseif rb_stopsign.checked = true then
ls_pic="StopSign!"
elseif rb_Exclamation.checked = true then
ls_pic="Exclamation!"
elseif rb_Question.checked = true then
ls_pic="Question!"
elseif rb_None.checked = true then
ls_pic=""
//按键选择
elseif rb_OK.checked = true then
ls_cb="OK!"
elseif rb_OKCancel.checked = true then
ls_cb="OKCancel!"
elseif rb_YesNo.checked = true then
ls_cb="YesNo!"
elseif rb_YesNoCancel.checked = true then
ls_cb="YesNoCancel!"
elseif rb_RetryCancel.checked = true then
ls_cb="RetryCancel!"
elseif rb_AbortRetryIgnore.checked = true then
ls_cb="AbortRetryIgnore!"
end if
value=integer(em_value.text)
//Messagebox(sle_title.text,sle_text.text)
Messagebox(sle_title.text,sle_text.text,ls_pic,ls_cb,value)