请教有关模拟按键问题

[jiangmenghen]

我想 模拟按 WIN 键 \键 .键 :键 请问 应该怎么做 给键值也可以

[jiangmenghen]

以前 发过一个求助贴子 要用来启动一个程序 但....大侠们给我的函数都起不了作用不知道为何~只有靠这种老土的方法来启动了

[beyondtkl]

键值是找到了 可是 好像不行 我再试试

{$EXTERNALSYM VK_LWIN}
VK_LWIN = 91;
{$EXTERNALSYM VK_RWIN}
VK_RWIN = 92;

[beyondtkl]

keybd_event(VK_LWIN, VK_LWIN, 0, 0);
keybd_event(VK_LWIN, VK_LWIN, KEYEVENTF_KEYUP, 0);

这样是可以弹出WIN键。。。 你还要做啥子呢

[terry6394]

你要启动什么程序，这么难啊？！ 找到程序路径 ShellExecute 不行吗？！

[newfang]

什么人离开公司的时候自动运行？？？

要不要
if date <> 某某离开公司的日期 then
Application.Terminate;

[jiangmenghen]

ShellExecute不行啊....不知道为什么 两个启动程序的API都不行..

我想做一个网游的自动登录器,那叫'碧雪情天'的,想让人离开公司后定时自动运行,但用尽我所知的办法都不行 不明白为什么 以前在这发过贴子 大家说的方法我试过了也不行

[jiangmenghen]

时间之类的我会 就是运行程序的API好像不行
而模拟按键中的

.键
\键
我又不知道是哪个值

[rain_day]

能不能用senemessage实现呢

[「已注销」]

ShellExecute不行啊....不知道为什么 两个启动程序的API都不行..

估计是你的参数设置有误~

[jiangmenghen]

能不能用senemessage实现呢?? 怎么用!?

参数有误 请问可以提供参数我试试吗?!

[maize]

power键的键值是什么？

[jiangmenghen]

power键? 你在D 中打进VK_HOME 按SHIFT键左击一下就可以查了

[qxj]

var
handle:THandle;
begin

handle:=FindWindow('Notepad','1 - 记事本');
form1.Caption:=intToStr(handle);
handle:=getWindow(handle,gw_child);

sendmessage(handle,wm_char,92,0); // \
sendmessage(handle,wm_char,46,0); // .
sendmessage(handle,wm_char,58,0); // :
end;