易语言选单选框分组框API全选取消

最新推荐文章于 2021-02-04 00:05:20 发布

511遇见

最新推荐文章于 2021-02-04 00:05:20 发布

阅读量2.8k

点赞数

分类专栏：易语言文章标签：易语言单选框易语言易语言教程易语言组件 511遇见

本文链接：https://blog.csdn.net/zcp528/article/details/107180312

版权

易语言专栏收录该内容

422 篇文章 102 订阅

订阅专栏

本节视频录制了对易语言单选框和分组框的全选与取消，分别采用了SendMessageA、PostMessageA、GetDlgCtrlID、CheckDlgButton等API来分三种方法实现。

视频链接：

单选框分组框API全选取消源码：

.版本 2

.子程序 _单选框5_被单击

.如果真 (单选框5.选中)
运行 (读环境变量 (“windir”) ＋ “\notepad.exe”, 假, )

.如果真结束

.子程序 _按钮1_被单击, , , 1--选中

SendMessageA (单选框6.取窗口句柄 (), 241, 1, 0)
SendMessageA (单选框7.取窗口句柄 (), 241, 1, 0)
SendMessageA (选择框1.取窗口句柄 (), 241, 1, 0)

.子程序 _按钮2_被单击

SendMessageA (单选框6.取窗口句柄 (), 241, 0, 0)
SendMessageA (单选框7.取窗口句柄 (), 241, 0, 0)
SendMessageA (选择框1.取窗口句柄 (), 241, 0, 0)

.子程序 _按钮3_被单击, , , PostMessageA

PostMessageA (单选框6.取窗口句柄 (), 241, 1, 0)
PostMessageA (单选框7.取窗口句柄 (), 241, 1, 0)
PostMessageA (选择框1.取窗口句柄 (), 241, 1, 0)

.子程序 _按钮4_被单击, , , PostMessageA

PostMessageA (单选框6.取窗口句柄 (), 241, 0, 0)
PostMessageA (单选框7.取窗口句柄 (), 241, 0, 0)
PostMessageA (选择框1.取窗口句柄 (), 241, 0, 0)

.子程序 _按钮5_被单击
.局部变量 id6
.局部变量 id7
.局部变量 id8

id6 ＝ GetDlgCtrlID (单选框6.取窗口句柄 ())
id7 ＝ GetDlgCtrlID (单选框7.取窗口句柄 ())
id8 ＝ GetDlgCtrlID (选择框1.取窗口句柄 ())
' 调试输出 (CheckRadioButton (取窗口句柄 (), id6, id7, id6))

' CheckRadioButton (取窗口句柄 (), id6, id7, id7)
CheckDlgButton (取窗口句柄 (), id6, 1)
CheckDlgButton (取窗口句柄 (), id7, 1)

CheckDlgButton (取窗口句柄 (), id8, 1)

.子程序 _按钮6_被单击
.局部变量 id6
.局部变量 id7
.局部变量 id8

id6 ＝ GetDlgCtrlID (单选框6.取窗口句柄 ())
id7 ＝ GetDlgCtrlID (单选框7.取窗口句柄 ())
id8 ＝ GetDlgCtrlID (选择框1.取窗口句柄 ())
' 调试输出 (CheckRadioButton (取窗口句柄 (), id6, id7, id6))

' CheckRadioButton (取窗口句柄 (), id6, id7, id7)
CheckDlgButton (取窗口句柄 (), id6, 0)
CheckDlgButton (取窗口句柄 (), id7, 0)
CheckDlgButton (取窗口句柄 (), id8, 0)

源码：511遇见易语言教程

511遇见易语言教程视频链接

易语言教程选单选框分组框API全选取消