TaskDialog不支持的标准按钮组合

易语言 2020-03-24 13:52:10

TaskDialog不支持的标准按钮组合

.如果真 (是否为空 (回调事件) = 假) ' 假如有回调事件
Result = 取空白文本 (100) ' 这个要申请一个内存块,如果回调事件处理了“uNotification =#TDN_BUTTON_CLICKED”,“wParam = 1”,则指针到整数 (dwRefData)就是此处地址,但是要根据数据适当选择大小!!
TASKDIALOGCONFIG.lpCallbackData = 取指针_通用型 (Result)
TASKDIALOGCONFIG.pfCallback = 回调事件
.如果真结束
TASKDIALOGCONFIG.pButtons = 取数组成员数 (拓展按钮) '
.计次循环首 (TASKDIALOGCONFIG.pButtons, pButtons_计次) ' 拓展按钮
加入成员 (拓展按钮_标题, 拓展按钮 [pButtons_计次].标题)
nDefaultButton_ = nDefaultButton_ + 到字节集 (拓展按钮 [pButtons_计次].ID) + 到字节集 (lstrcpyn (拓展按钮_标题 [pButtons_计次], 拓展按钮_标题 [pButtons_计次], 0))
.计次循环尾 ()
.如果 (TASKDIALOGCONFIG.pButtons > 0)
TASKDIALOGCONFIG.nDefaultButton = nDefaultButton_
TASKDIALOGCONFIG.pszVerificationText = 默认单选框
.否则
TASKDIALOGCONFIG.nDefaultButton = { }
.如果结束
TASKDIALOGCONFIG.pRadioButtons = 取数组成员数 (单选框) ' 单选框
.计次循环首 (TASKDIALOGCONFIG.pRadioButtons, pButtons_计次)
加入成员 (单选框_标题, 单选框 [pButtons_计次].标题)
nDefaultRadioButton_ = nDefaultRadioButton_ + 到字节集 (单选框 [pButtons_计次].ID) + 到字节集 (lstrcpyn (单选框_标题 [pButtons_计次], 单选框_标题 [pButtons_计次], 0))
.计次循环尾 ()
.如果 (TASKDIALOGCONFIG.pRadioButtons > 0)
TASKDIALOGCONFIG.nDefaultRadioButton = nDefaultButton_
.否则
TASKDIALOGCONFIG.nDefaultRadioButton = { }
.如果结束
back = TaskDialogIndirect (TASKDIALOGCONFIG, pnButton, 单选框返回, 复选框返回)