Q语言 我的命令库《通用》窗口命令功能函数源码

‘---------------------窗口操作命令-------------------------------------

Function window_move(窗口句柄, x, y) //移动窗口2500,0 将窗口移出屏幕,起到隐藏窗口作用

    Call Plugin.Window.move(窗口句柄, 2500, 0)

End Function

Function window_shin(窗口句柄, x, y)

    Call Plugin.Window.move(窗口句柄, x, y) //移动窗口至x,y  与上条配合使用恢复窗口

End Function

Function window_hide(窗口句柄)

    Call Plugin.Window.Hide(窗口句柄)  //隐藏窗口
End Function

Function window_show(窗口句柄)

    Call Plugin.Window.Show(窗口句柄) //显示窗口
End Function

Function getwindow_X(窗口句柄)  //取窗口宽

    Dim srect ,srect0
    getwindow_X=0
    sRect = Plugin.Window.GetClientRect(窗口句柄)
    sRect0 = split(sRect, "|")
    getwindow_X = Clng(sRect0(2)) - Clng(sRect0(0))//窗口宽
End Function 

Function getwindow_Y(窗口句柄) //取窗口高

    Dim srect ,srect0
    getwindow_Y=0
    sRect = Plugin.Window.GetClientRect(窗口句柄)
    sRect0 = split(sRect, "|")
    getwindow_Y = Clng(sRect0(3)) - Clng(sRect0(1))//窗口高
End Function 

Function getclient_X(窗口句柄) //取窗口用户区X坐标

    Dim srect ,srect0
    getclient_X=0
    sRect = Plugin.Window.GetClientRect(窗口句柄)
    sRect0 = split(sRect, "|")
    getclient_X = Clng(sRect0(0))//左上角X
End Function 

Function getclient_Y(窗口句柄) //取窗口用户区Y坐标

    Dim srect ,srect0
    getclient_Y=0
    sRect = Plugin.Window.GetClientRect(窗口句柄)
    sRect0 = split(sRect, "|")
    getclient_Y = Clng(sRect0(1))//左上角Y
End Function 

Function window_size(窗口句柄, Hwnd2) //取窗口数据 存入全局变量 

    Dim srect ,srect0
    window_size=false
    sRect = Plugin.Window.GetClientRect(窗口句柄)
    sRect0=split(sRect,"|")
    client_X = Clng(sRect0(0))//左上角X
    client_Y = Clng(sRect0(1))//左上角Y
    client_X2 = Clng(sRect0(2))
    client_Y2 = Clng(sRect0(3))
    window_x = Clng(sRect0(2)) - Clng(sRect0(0))//窗口宽
    window_y = Clng(sRect0(3)) - Clng(sRect0(1))//窗口高
    window_xH = window_x / 2
    window_yH = window_y / 2
    sRect1 = Plugin.Window.GetWindowRect(Hwnd2)
    sRect2=split(sRect1,"|")
    Hwnd_X = Clng(sRect2(0))
    Hwnd_Y = Clng(sRect2(1))
    If client_X > 0 Then
        日志运行内容 =  V_当前程序&"得到窗口数据:" & Hwnd & "[" & client_X & "," & client_Y & "](" & window_x & "," & window_y & ")(" & window_xH & "," & window_yH& ")"
        Call 输出日志(日志运行内容):TracePrint 日志运行内容
        日志运行内容 =  V_当前程序&"得到数据:" & Hwnd_0 & "[" & Hwnd_X & "," & Hwnd_Y & "]"
        Call 输出日志(日志运行内容):TracePrint 日志运行内容
        window_size=true
    Else
        window_size=false
    End If
End Function

/* 全局变量
client_X = Clng(sRect0(0))//左上角X
client_Y = Clng(sRect0(1))//左上角Y
client_X2 = Clng(sRect0(2))
client_Y2 = Clng(sRect0(3))
window_x = Clng(sRect0(2)) - Clng(sRect0(0))//窗口宽
window_y = Clng(sRect0(3)) - Clng(sRect0(1))//窗口高
window_xH = window_x / 2
window_yH = window_y / 2
Hwnd_X = Clng(sRect2(0))
Hwnd_Y = Clng(sRect2(1))

原文地址:https://blog.51cto.com/12815848/2441497

时间: 2024-11-08 18:02:20

Q语言 我的命令库《通用》窗口命令功能函数源码的相关文章

C语言字符串处理函数源码

strstr()函数源码 /* 得到s1中第一次包含s2字符串的位置指针. */ #include <stdlib.h> char * my_strstr(const char *s1,const char *s2) { if (*s1 == 0) { if (*s2) return (char *) NULL; return (char *) s1; } while (*s1) { size_t i; i = 0; while (1) { if (s2[i] == 0) { return (

【转】值得学习的C语言开源项目和库

- 1. Webbench Webbench是一个在linux下使用的非常简单的网站压测工具.它使用fork()模拟多个客户端同时访问我们设定的URL,测试网站在压力下工作的性能,最多可以模拟3万个并发连接去测试网站的负载能力.Webbench使用C语言编写, 代码实在太简洁,源码加起来不到600行. 下载链接:http://home.tiscali.cz/~cz210552/webbench.html - 2. Tinyhttpd tinyhttpd是一个超轻量型Http Server,使用C

Unix Linux 通用vi命令,使用帮助手册【珍藏版

Unix Linux 通用vi命令,使用帮助手册[珍藏版] Vi 简介 Vi 是 Unix 世界里极为普遍的全萤幕文书编辑器,几乎可以说任何一台 Unix 机器都会提供这套软体.Linux 当然也有,它的 vi 其实是 elvis(版权问题),不过它们都差不多.熟悉 DOS 下的文书处理後,也许会感到 vi 并不好用:Unix 上也已经发展出许多更新.更好用的文书编辑器,但是并不一定每一台 Unix 机器上都会安装这些额外的软体.所以,学习 vi 的基本操作还是有好处,让你在各个不同的机器上得心

C语言通用双向循环链表操作函数集

说明 相比Linux内核链表宿主结构可有多个链表结构的优点,本函数集侧重封装性和易用性,而灵活性和效率有所降低.     可基于该函数集方便地构造栈或队列集.     本函数集暂未考虑并发保护. 一  概念 链表是一种物理存储单元上非连续.非顺序的存储结构,数据元素的逻辑顺序通过链表中的指针链接次序实现.链表由一系列存储结点组成,结点可在运行时动态生成.每个结点均由两部分组成,即存储数据元素的数据域和存储相邻结点地址的指针域.当进行插入或删除操作时,链表只需修改相关结点的指针域即可,因此相比线性

Windows 10/Win10命令大全通用(Win8,Win7)

Windows 10/Win10命令大全通用(Win8,Win7)     1.calc:启动计算器 2 .appwiz.cpl:程序和功能 3.certmgr.msc:证书管理实用程序 4.charmap:启动字符映射表 5.chkdsk.exe:Chkdsk磁盘检查(管理员身份运行命令提示符) 6.cleanmgr: 打开磁盘清理工具 7.cliconfg:SQL SERVER 客户端网络实用工具 8.cmstp:连接管理器配置文件安装程序 9.cmd.exe:CMD命令提示符 10.自动关

使用sh库执行shell命令

python中执行shell命令 之前执行shell命令多是通过os.system(shell命令)的方式来执行,比较麻烦. 了解到sh是一个比subprocess好的库,能够执行shell命令 1.查看ip: [[email protected] myblog]# ifconfigeth0: flags=4163<UP,BROADCAST,RUNNING,MULTICAST> mtu 1500inet 172.31.253.193 netmask 255.255.240.0 broadcas

添加右键菜单命令 在此处打开命令窗口(W)(带图标)

@color 0A @title 添加右键菜单命令 在此处打开命令窗口(W)(带图标) by wjshan0808 @echo off reg add HKCR\Directory\Background\shell\在此处打开命令窗口(W) /v Icon /t reg_expand_sz /d %ComSpec% /f reg add HKCR\Directory\Background\shell\在此处打开命令窗口(W)\command /ve /t reg_sz /d "%ComSpec%

WIN7、WIN8 右键在目录当前打开命令行Cmd窗口(图文)

Win7系统大家习惯“Win+R”的组合键打开命令提示符. 通常右击文件夹是没有进入命令行 进入某个文件夹里面,先按住Shift键,然后鼠标右键,出现选项“在此处打开命令窗口(W)”也可以打开命令行. 这样就可以很简单通过cmd进入某个文件夹 WIN7.WIN8 右键在目录当前打开命令行Cmd窗口(图文),布布扣,bubuko.com

boost之program_options库,解析命令行参数、读取配置文件

一.命令行解析 tprogram_options解析命令行参数示例代码: [cpp] view plaincopy #include <iostream> using namespace std; #include <boost/program_options.hpp> namespace po = boost::program_options; int main(int argc, char*argv[]) { //int level; po::options_descripti