麻烦大神修复一下代码

103029110

麻烦大神修复一下代码，软件可以生成，但是点击录制后没有反应，请大神帮忙看一下帮忙修复一下代码，谢谢

hongqingfeng

请问一下你这是写的什么？录视频吗？

Suky

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
结构体大小	整数型
RIDevice	RAWINPUTDEVICE

结构体大小 ＝ 取变量数据地址 (RIDevice.usUsagePage) － 取变量数据地址 (RIDevice)
' 结构体大小 = 结构体大小 + 取数据类型大小(整数型)  ' 最后一个成员的大小
结构体大小 ＝ 取变量地址 (RIDevice.hwndTarget) － 取变量地址 (RIDevice) ＋ 4
RIDevice.usUsagePage ＝ 1
RIDevice.usUsage ＝ 2
RIDevice.dwFlags ＝ 256  ' RIDEV_INPUTSINK
RIDevice.hwndTarget ＝ _启动窗口.取窗口句柄 ()
如果真 (RegisterRawInputDevices (RIDevice, 1, #RAWINPUTDEVICE_SIZE ) ＝ 假)
信息框 (“错误代码：” ＋ 到文本 (取错误码 ()), 16, , )

' RIDevice.usUsagePage ＝ 1  ' HID_USAGE_PAGE_GENERIC
' RIDevice.usUsage ＝ 2  ' HID_USAGE_GENERIC_MOUSE
' RIDevice.dwFlags ＝ #RIDEV_INPUTSINK
' RIDevice.hwndTarget ＝ _启动窗口.取窗口句柄 ()
' 如果真 (RegisterRawInputDevices (RIDevice, 1, Sizeof (RIDevice)) ＝ 假)
' 信息框 (“设备注册失败！错误码：” ＋ 到文本 (取最后错误 ()), 0, , )

子程序名	返回值类型	公开	备 注
_按钮_开始录制_被单击

录制标志 ＝ 真
上次时间 ＝ 0
清除数组 (移动数据数组)
编辑框1.内容 ＝ “? 录制中...”
编辑框1.刷新显示 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 结构体大小, 整数型<br /> .局部变量 RIDevice, RAWINPUTDEVICE<br /> <br /> 结构体大小 ＝ 取变量数据地址 (RIDevice.usUsagePage) － 取变量数据地址 (RIDevice)<br /> ' 结构体大小 = 结构体大小 + 取数据类型大小(整数型)  ' 最后一个成员的大小<br /> 结构体大小 ＝ 取变量地址 (RIDevice.hwndTarget) － 取变量地址 (RIDevice) ＋ 4<br /> <br /> RIDevice.usUsagePage ＝ 1<br /> RIDevice.usUsage ＝ 2<br /> RIDevice.dwFlags ＝ 256  ' RIDEV_INPUTSINK<br /> RIDevice.hwndTarget ＝ _启动窗口.取窗口句柄 ()<br /> <br /> .如果真 (RegisterRawInputDevices (RIDevice, 1, #RAWINPUTDEVICE_SIZE) ＝ 假)<br />     信息框 (“错误代码：” ＋ 到文本 (取错误码 ()), 16, , )<br /> .如果真结束<br /> <br /> <br /> <br /> ' RIDevice.usUsagePage ＝ 1  ' HID_USAGE_PAGE_GENERIC<br /> ' RIDevice.usUsage ＝ 2  ' HID_USAGE_GENERIC_MOUSE<br /> ' RIDevice.dwFlags ＝ #RIDEV_INPUTSINK<br /> ' RIDevice.hwndTarget ＝ _启动窗口.取窗口句柄 ()<br /> ' 如果真 (RegisterRawInputDevices (RIDevice, 1, Sizeof (RIDevice)) ＝ 假)<br /> ' 信息框 (“设备注册失败！错误码：” ＋ 到文本 (取最后错误 ()), 0, , )<br /> <br /> <br /> <br /> .子程序 _按钮_开始录制_被单击<br /> <br /> 录制标志 ＝ 真<br /> 上次时间 ＝ 0<br /> 清除数组 (移动数据数组)<br /> 编辑框1.内容 ＝ “? 录制中...”<br /> 编辑框1.刷新显示 ()

你看看你的代码，你完全就没写录制动作的代码
还想让它有什么动作嘛？
至少录制相关的代码写一下才行啊


补充内容 (2025-2-26 03:01):
功能代码都没写的，你这就纯粹是让人给你写一个，而不是修复了╮(╯▽╰)╭