如何调用XP系统自带的屏幕键盘

[jzg272727]

我用API函数调出windows系统的屏幕键盘，却不能使用，不能输入任何字母，不知道该如何解决，请各位大侠帮忙！
procedure TForm1.Button1Click(Sender: TObject);
begin
winexec('C:\WINDOWS\system32\osk.exe',sw_show);
end;

[Steven_WU]

[山东蓝鸟贵薪]

引用 楼主 jzg272727 的回复:

我用API函数调出windows系统的屏幕键盘，却不能使用，不能输入任何字母，不知道该如何解决，请各位大侠帮忙！ procedure TForm1.Button1Click(Sender: TObject); begin winexec('C:\WINDOWS\system32\osk.exe',sw_show); end;

winexec('C:\WINDOWS\system32\osk.exe',sw_show); 这个地方，建议 1）先获取 系统的路径 C:\WINDOWS 2)再测试一下osk.exe文件是否存在 3）再组合起来 调用即可

[fox600123]

路径可以去掉，控件要获得焦点才能录入 procedure TForm1.Button1Click(Sender: TObject); begin winexec('osk.exe',sw_show); edit1.setfocus; end;