Function osk
Declare Long FindWindow  In WIN32API String, String
Declare Long SetWindowPos  In WIN32API Integer,Integer,Integer,Integer,Integer,Integer,Integer
Declare Long ShowWindow  In WIN32API Long, Long

HWnd = FindWindow( .Null. , "On-Screen Keyboard" )

If HWnd = 0
	Run /N osk
	HWnd = FindWindow( .Null. , "On-Screen Keyboard")
	SetWindowPos( HWnd , -1 , 1, Sysmetric(22)-300 , Sysmetric(21) , 300 , 0 )
Else
	ShowWindow( HWnd , 9 )
	SetWindowPos( HWnd , -1 , 1, Sysmetric(22)-300 , Sysmetric(21) , 300 , 0 )
Endif
Endfunc

>Hi All
>
>looking for a way of launching osk.exe which is the windows onscreen keyboard when a user clicks on a command button
>
>Also a way of terminating the program as well
>
>Thanks
>
>Brian O Donovan