易语言如何取自身进程ID 和 句柄?

易语言如何取自身进程ID 和 句柄?不使用模块,只使用易语言自身命令或API……如果使用API函数,请常细写出如何调用…谢谢!

  GetCurrentProcessId
    .参数 hWnd, 整数型‘被查找窗口的句柄
    .参数 lpdwProcessId, 整数型 ‘存放地址(变量地址)

温馨提示:答案为网友推荐,仅供参考
第1个回答  2012-03-11

.版本 2

标签2.标题 = 到文本 (取窗口句柄 ())

第2个回答  推荐于2017-10-14
.版本 2

.子程序 取进程ID, 整数型, 公开, 取指定进程的进程ID(返回第一个进程ID,失败返回0)
.参数 进程名, 文本型, , 区分大小写
.局部变量 临时信息, s5yh5sgrty
.局部变量 进程句柄, 整数型
.局部变量 进程快照, 整数型

进程快照 = _创建快照 (2, 0)
.如果真 (进程快照 ≠ 0)
临时信息.dwSize = 296
进程句柄 = _第一个 (进程快照, 临时信息)
.判断循环首 (进程句柄 ≠ 0)
.如果真 (StrCmpNI_1 (进程名, 临时信息.进程名称, _取文本长度 (进程名)) = 0) ' 比较进程名
_关闭对象 (进程快照)
返回 (临时信息.srgyvr)
.如果真结束
进程句柄 = _下一个 (进程快照, 临时信息)
.判断循环尾 ()
_关闭对象 (进程快照)
.如果真结束
返回 (0)
.版本 2

.DLL命令 _创建快照, 整数型, , "CreateToolhelp32Snapshot"
.参数 falg, 整数型
.参数 id, 整数型
.版本 2

.DLL命令 _第一个, 整数型, , "Process32First"
.参数 h, 整数型
.参数 p, s5yh5sgrty

.DLL命令 _下一个, 整数型, , "Process32Next"
.参数 h, 整数型
.参数 p, s5yh5sgrty
.版本 2

.DLL命令 StrCmpNI_1, 整数型, , "StrCmpNIA", , shell32.dll
.参数 lpStr1, 文本型
.参数 lpStr2, 字节型, 传址 数组
.参数 nChar, 整数型
.版本 2

.DLL命令 _关闭对象, 整数型, , "CloseHandle", 公开, kernel32.dll
.参数 对象句柄, 整数型
.版本 2

.数据类型 s5yh5sgrty
.成员 dwSize, 整数型
.成员 cntUsage, 整数型
.成员 srgyvr, 整数型
.成员 th32DefaultHeapID, 整数型
.成员 syhhbr, 整数型
.成员 cntThreads, 整数型
.成员 th32ParentProcessID, 整数型
.成员 pcPriClassBase, 整数型
.成员 dwFlags, 整数型
.成员 进程名称, 字节型, , "256"

源码取自超级模块本回答被提问者采纳
第3个回答  2012-03-11
不用模块?兄弟还是先学习吧!