2753查看
4回复

[经验分享] 用代码实现

主题	好友	248 积分

中级会员

发消息

发表于 2009-7-23 22:45:06 |显示全部楼层

易语言打开无法布满屏幕解决法  每次打开易语言都要拖一下因为他上面一截空白

特写了一个小程序方便使用此程序一双击自动结束不残留进程当他结束后您的易语言已经满屏了  呵呵下面也不会被任务栏遮住

------------------------------------------------------------

.版本 2

.程序集窗口程序集1
.程序集变量 Title, 文本型
.程序集变量 hWnd, 整数型

.子程序 __启动窗口_创建完毕

hWnd ＝ FindWindowA (“ENewFrame”, Title)
.如果 (hWnd ≠ 0)
SetWindowPos (hWnd, 0, 0, 0, 取屏幕宽度 (), 取屏幕高度 () － 20, 64)
结束 ()  ' 展开后自动关闭此程序
.否则
信息框 (“您没有开启易语言”, 64, )
结束 ()

使用道具举报