软键盘问题！！！！！！(50分)

我用keybd_event(65,0,0,0) 一类的函数实现的软键盘操作
有两个问题：
1.如何使自己做的软键盘实现多个进程的输入(定时器方法除外)
2.
var
key:tkeyboardstate;
begin
key[vk_capital]:=0
用getkeyboardState()和setkeyboardstate()函数进行大小写切换，但这种方法无法控制键盘上的capslock灯

用模拟按键的方式:
PostMessage(From1.Handle,WM_KEYDOWN,VK_NUMLOCK,0);