I want execute the keyboard system but on win 7 not run
Local Keyboar:= GetEnv( "windir" ) + "\system32\osk.exe"
DEFINE DIALOG oDlg
....
ACTIVATE DIALOG oDlg CENTERED;
on init ShellExecute( 0, "open",TS, "", ".", .t. )
I want execute the keyboard system but on win 7 not run
Local Keyboar:= GetEnv( "windir" ) + "\system32\osk.exe"
DEFINE DIALOG oDlg
....
ACTIVATE DIALOG oDlg CENTERED;
on init ShellExecute( 0, "open",TS, "", ".", .t. )
#include "fivewin.ch"
function main()
local Keyboar:= GetEnv( "windir" ) + "\system32\osk.exe"
define window oWnd
activate window oWnd;
on init( ShellExecute( 0, "open", Keyboar ) )
return nilsorry I mke an error
Local Ts :=:= GetEnv( "windir" ) + "\system32\osk.exe"
and your sample not run on win 7 64 bit home premium
it show a dialog with " Impossible run keyboard on screen "
Any solution ?
I run osk.exe and It appers.
Maybe the osk.exe is not on your pc.
Please try copying osk.exe to some other folder and shellexecute from that folder.

hola foro,
pues tuve la necesidad de usar osk.exe, y si carga bien el teclado, nomas que tengo 2 dudas:
gracias
paco
yo mismo,
resolved !!!
thks
paco
Francisco,
Can you please share the solution?.
Thanks
FiveWidi,
LOCAL cKeyboard := GetEnv( "windir" ) + "\system32\osk.exe", lKeyboard := .f.
Abrirlo:
ShellExecute( 0, "open", cKeyboard )
Cerrarlo:
SendMessage( FindWindow( 0, "Teclado en pantalla" ), WM_CLOSE )
salu2
paco