ShellExecute ON WIN 7

[MdaSolution]

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. )

[Daniel Garcia-Gil]

Hello

what is "TS" inside ShellExecute??

please try...

Code: Select all  Expand view

#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 nil

[MdaSolution]

sorry 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 "

[MdaSolution]

Any solution ?

[ukservice]

I run osk.exe and It appers.

Maybe the osk.exe is not on your pc.

[nageswaragunupudi]

Please try copying osk.exe to some other folder and shellexecute from that folder.

[MdaSolution]

yes !!!
osk.exe is on my computer

I have windows Seven home premium 64 bit

if run osk from start-> it is showed on my desktop

I want show it from my application to use it with touch screen computer ( with no keyboard)

it is impossible with fhw ?

while I was waitng a message for this problem I created a virtual keyboard but I have a problem:

look :




for each get I must open the virtual keyboard

but when I open the keyboard virtual I must insert the word I pressed into get of virtual keyboard

instead I want it must insert the key I pressed directly on the get of the dialog

as it make with osk of windows

for each buttons I use ACTION (MsgBeep(), oGetTexto:SetFocus(), oGetTexto:KeyChar(ASC("Q")) )

where oGetTexto is the get of virtual keyboard

how I can to make it ?

[Francisco Horta]

hola foro,

pues tuve la necesidad de usar osk.exe, y si carga bien el teclado, nomas que tengo 2 dudas:

1. al cerrar la ventana del osk.exe me envia el caracter "[" al get de busqueda, como evitar esto?
2. como cierro el osk.exe cuando se cierra el dialogo en el que se abrio

gracias
paco

[Francisco Horta]

yo mismo,

resolved !!!
thks
paco

[fivewin]

Francisco,

Can you please share the solution?.

Thanks

[Francisco Horta]

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