多屏幕模块源码 - 精易论坛

窗口程序集名	保留	保留	备注
程序集1

子程序名	返回值类型	公开	备注
_启动子程序	整数型		请在本子程序中放置易模块初始化代码

_临时子程序 () ' 在初始化代码执行完毕后调用测试代码
返回 (0) ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备注
_临时子程序

' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。

子程序名	返回值类型	公开	备注
系统_取屏幕数量	整数型

清除数组 (hDisplayInf)
EnumDisplayMonitors (0, 0, 到整数 (&MonitorEnumProc), 0)
返回 (取数组成员数_ASM (hDisplayInf))

子程序名	返回值类型	公开	备注
MonitorEnumProc	逻辑型
参数名	类型	参考	可空	数组	备注
hMonitor	整数型
hdcMonitor	整数型
lprcMonitor	整数型
dwData	整数型

加入成员 (hDisplayInf, hMonitor)
返回 (真)

子程序名	返回值类型	公开	备注
取数组成员数_ASM	整数型		取数组成员数
参数名	类型	参考	可空	数组	备注
aArray	通用型

置入代码 ({ 49, 192, 139, 69, 8, 139, 0, 133, 192, 116, 3, 139, 64, 4, 137, 236, 93, 194, 4, 0 })
' xor eax,eax
' mov eax,dword[ebp+0x08]
' mov eax,dword[eax]
' test eax,eax
' je label1
' mov eax,dword[eax+0x04]
' label1:
' mov esp,ebp
' pop ebp
' retn 4
返回 (0)

子程序名	返回值类型	公开	备注
取窗口所在显示器信息	屏幕信息
参数名	类型	参考	可空	数组	备注
窗口句柄	整数型

变量名	类型	静态	数组	备注
mid	整数型

mid ＝ MonitorFromWindow (窗口句柄, 2)
返回 (取屏幕信息 (mid))

子程序名	返回值类型	公开	备注
取屏幕信息	屏幕信息
参数名	类型	参考	可空	数组	备注
显示器句柄	整数型

变量名	类型	静态	数组	备注
mi	MonitorInfo
hMonitor	整数型
pmxx	屏幕信息

mi.cbSize ＝ 40
GetMonitorInfo (显示器句柄, mi)
pmxx.cbSize ＝ mi.cbSize
pmxx.dwFlags ＝ mi.dwFlags
pmxx.Top_Work ＝ mi.Top_Work
pmxx.Left_Work ＝ mi.Left_Work
pmxx.Right_Work ＝ mi.Right_Work
pmxx.显示器句柄＝显示器句柄
pmxx.Bottom_Work ＝ mi.Bottom_Work
pmxx.屏幕最左坐标＝ mi.屏幕最左坐标
pmxx.屏幕最上坐标＝ mi.屏幕最上坐标
pmxx.屏幕最右坐标＝ mi.屏幕最右坐标
pmxx.屏幕最下坐标＝ mi.屏幕最下坐标
返回 (pmxx)

子程序名	返回值类型	公开	备注
一些说明子程序

' 1.使用EnumDisplayMonitors枚举所有显示器
' 2.在枚举的回调函数MonitorEnumProc有个LPRECT lprcMonitor参数,就是该显示器的矩形
' 3.也可以使用GetMonitorInfo获取某个显示器的信息,参数 MONITORINFO或MONITORINFOEX的结构里有显示器的矩形
' 4.使用MoveWindow、SetWindowPos等函数把你的窗口移到指定位置就可以了.
' 5.要覆盖所有显示器,无非就是把全部显示器的矩形加到一起
' 所拥有的显示器个数以及其名称。
' MonitorInfoex 和MonitorInfo 。在这两个结构中保存着相应显示器的相关信息,如坐标、是否为主显示器等。
' GetMonitorInfo ( ) 取得指定显示器的相关信息,如物理显示区大小等。
' MonitorFromPoint ( ) 取得指定点所在的显示器句柄。
' MonitorFromRect ( ) 取得指定矩形所在的显示器句柄。
' MonitorFromWindow( ) 取得指定窗口所在的显示器句柄

.版本 2<br />
<br />
.程序集 程序集1<br />
<br />
.子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码<br />
<br />
<br />
_临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码<br />
返回 (0)  ' 可以根据您的需要返回任意数值<br />
<br />
.子程序 _临时子程序<br />
<br />
' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。<br />
<br />
<br />
.子程序 系统_取屏幕数量, 整数型, 公开<br />
<br />
清除数组 (hDisplayInf)<br />
EnumDisplayMonitors (0, 0, 到整数 (&MonitorEnumProc), 0)<br />
返回 (取数组成员数_ASM (hDisplayInf))<br />
<br />
<br />
.子程序 MonitorEnumProc, 逻辑型<br />
.参数 hMonitor, 整数型<br />
.参数 hdcMonitor, 整数型<br />
.参数 lprcMonitor, 整数型<br />
.参数 dwData, 整数型<br />
<br />
加入成员 (hDisplayInf, hMonitor)<br />
返回 (真)<br />
<br />
.子程序 取数组成员数_ASM, 整数型, , 取数组成员数<br />
.参数 aArray, 通用型, 数组<br />
<br />
置入代码 ({ 49, 192, 139, 69, 8, 139, 0, 133, 192, 116, 3, 139, 64, 4, 137, 236, 93, 194, 4, 0 })<br />
' xor eax,eax<br />
' mov eax,dword[ebp+0x08]<br />
' mov eax,dword[eax]<br />
' test eax,eax<br />
' je label1<br />
' mov eax,dword[eax+0x04]<br />
' label1:<br />
' mov esp,ebp<br />
' pop ebp<br />
' retn 4<br />
返回 (0)<br />
<br />
.子程序 取窗口所在显示器信息, 屏幕信息, 公开<br />
.参数 窗口句柄, 整数型<br />
.局部变量 mid, 整数型<br />
<br />
mid ＝ MonitorFromWindow (窗口句柄, 2)<br />
返回 (取屏幕信息 (mid))<br />
<br />
<br />
.子程序 取屏幕信息, 屏幕信息, 公开<br />
.参数 显示器句柄, 整数型<br />
.局部变量 mi, MonitorInfo<br />
.局部变量 hMonitor, 整数型<br />
.局部变量 pmxx, 屏幕信息<br />
<br />
mi.cbSize ＝ 40<br />
GetMonitorInfo (显示器句柄, mi)<br />
pmxx.cbSize ＝ mi.cbSize<br />
pmxx.dwFlags ＝ mi.dwFlags<br />
pmxx.Top_Work ＝ mi.Top_Work<br />
pmxx.Left_Work ＝ mi.Left_Work<br />
pmxx.Right_Work ＝ mi.Right_Work<br />
pmxx.显示器句柄 ＝ 显示器句柄<br />
pmxx.Bottom_Work ＝ mi.Bottom_Work<br />
pmxx.屏幕最左坐标 ＝ mi.屏幕最左坐标<br />
pmxx.屏幕最上坐标 ＝ mi.屏幕最上坐标<br />
pmxx.屏幕最右坐标 ＝ mi.屏幕最右坐标<br />
pmxx.屏幕最下坐标 ＝ mi.屏幕最下坐标<br />
返回 (pmxx)<br />
<br />
<br />
.子程序 一些说明子程序<br />
<br />
' 1.使用EnumDisplayMonitors枚举所有显示器<br />
' 2.在枚举的回调函数MonitorEnumProc有个LPRECT lprcMonitor参数,就是该显示器的矩形<br />
' 3.也可以使用GetMonitorInfo获取某个显示器的信息,参数 MONITORINFO或MONITORINFOEX的结构里有显示器的矩形<br />
' 4.使用MoveWindow、SetWindowPos等函数把你的窗口移到指定位置就可以了.<br />
' 5.要覆盖所有显示器,无非就是把全部显示器的矩形加到一起<br />
<br />
' 所拥有的显示器个数以及其名称。<br />
<br />
' MonitorInfoex 和MonitorInfo 。在这两个结构中保存着相应显示器的相关信息,如坐标、是否为主显示器等。<br />
' GetMonitorInfo ( )   取得指定显示器的相关信息,如物理显示区大小等。<br />
' MonitorFromPoint ( )   取得指定点所在的显示器句柄。<br />
' MonitorFromRect ( )   取得指定矩形所在的显示器句柄。<br />
' MonitorFromWindow( )   取得指定窗口所在的显示器句柄