How to automatic activate keyboard on screen on W8?

How to automatic activate keyboard on screen on W8?

Postby dutch » Sat Apr 25, 2015 1:28 am

I would like to activate keyboard on screen as usual (tablet natual)? Because when oGet:Setfocus() on W8, it doesn't activate the keyboard automatically.

Thanks&regards,
Dutch
Regards,
Dutch

FWH 19.01 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio
FWPPC 10.02 / Harbour for PPC (FTDN)
ADS V.9 / MySql / MariaDB
R&R 12 Infinity / Crystal Report XI R2
(Thailand)
User avatar
dutch
 
Posts: 1543
Joined: Fri Oct 07, 2005 5:56 pm
Location: Thailand

Re: How to automatic activate keyboard on screen on W8?

Postby cnavarro » Sat Apr 25, 2015 8:07 am

Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
User avatar
cnavarro
 
Posts: 6549
Joined: Wed Feb 15, 2012 8:25 pm
Location: España

Re: How to automatic activate keyboard on screen on W8?

Postby dutch » Mon Apr 27, 2015 10:56 am

Dear Cnavarro,

Do I need to modify or override class TGet:gotfocus() as sample?

When will I should be unload Keyboard?
Code: Select all  Expand view  RUN
TGet.Prg

STATIC hWndGet
...
METHOD GotFocus()

IF hWndGet == NIL .OR. hWndGet != ::hWnd
WinExec("TabTip.Exe")
ENDIF
.....
hWndGet:= ::hWnd
RETURN 0

Code: Select all  Expand view  RUN
//-------------------------------------------------------------------------//
// For Windows 8.
FUNCTION ShowInputPanel()
*
ShellExecute(, "open", "tabtip.exe")
*
RETURN NIL
*
//-------------------------------------------------------------------------//
// For Windows 8.
FUNCTION HideInputPanel()
Local hWndInputPanel
*
hWndInputPanel:= FindWindow("IPTip_Main_Window")
PostMessage(hWndInputPanel, WM_SYSCOMMAND, SC_CLOSE, 0)
* (¿ SysRefresh() ? )
RETURN NIL
Antonio Mart.
 
Posts: 123
Joined: Sat Feb 23, 2013 5:04 pm
 

Regards,
Dutch

FWH 19.01 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio
FWPPC 10.02 / Harbour for PPC (FTDN)
ADS V.9 / MySql / MariaDB
R&R 12 Infinity / Crystal Report XI R2
(Thailand)
User avatar
dutch
 
Posts: 1543
Joined: Fri Oct 07, 2005 5:56 pm
Location: Thailand


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 97 guests