Tablet and form style for Windows 8 (desktop ver.)

Re: Tablet and form style for Windows 8 (desktop ver.)

Postby dutch » Fri May 08, 2015 3:04 pm

Dear Otto,

How do you make Get Box as your image program. It's really cool.
Otto wrote:Hello,
this is what I would need for my application.


Image

Thanks in advance
Otto
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: 1542
Joined: Fri Oct 07, 2005 5:56 pm
Location: Thailand

Re: Tablet and form style for Windows 8 (desktop ver.)

Postby Richard Chidiak » Wed Jun 03, 2015 5:14 pm

Mr Rao

Any timetable for such changes.

I am also interested in yhis feature,

Thanks for reply.

IMO it would be great to enhance fw for windows tablets

Richard
http://www.cbati.com

Uestudio
Fwh 13.05 Harbour 3.2 MSVC 2013
User avatar
Richard Chidiak
 
Posts: 946
Joined: Thu Oct 06, 2005 7:05 pm
Location: France

Re: Tablet and form style for Windows 8 (desktop ver.)

Postby nageswaragunupudi » Wed Jun 03, 2015 5:24 pm

We are working on it for desktop and tablets.
Trying to catch 15.06 but should not be later than 15.07.
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10633
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: Tablet and form style for Windows 8 (desktop ver.)

Postby Silvio.Falconi » Thu Aug 01, 2019 10:16 pm

I have Lenovo MIIX320 and the test sample of Navarro not run here
I cannot see the kyboard of windows
nothing with osk or oskb
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7056
Joined: Thu Oct 18, 2012 7:17 pm

Re: Tablet and form style for Windows 8 (desktop ver.)

Postby Jimmy » Thu Oct 03, 2019 2:28 am

Silvio.Falconi wrote:I have Lenovo MIIX320 and the test sample of Navarro not run here
I cannot see the kyboard of windows
nothing with osk or oskb
i have a 310 Miix and it have 64 Bit OS
i guess your App is 32 Bit :?:

if yes read about disable "WOW64 Redirection"
http://forums.fivetechsupport.com/viewtopic.php?f=3&t=37570&p=226179#p226179
greeting,
Jimmy
User avatar
Jimmy
 
Posts: 1732
Joined: Thu Sep 05, 2019 5:32 am
Location: Hamburg, Germany

Re: Tablet and form style for Windows 8 (desktop ver.)

Postby Jimmy » Thu Oct 03, 2019 3:51 am

hi

i have made a OSK CLASS with Xbase++ but i guess Problem are same.
to type into "own" OSK it must have Focus and it must know which Control send Keystoke to ...

guess you have a Form an 3 x "Edit" so if you begin to type into OSK you want to have Keystoke in 1st "Edit"
now press "TAB" to change to next "Edit" and give "own" OSK Focus again to press next Key ...

when press a Key most is to send "as it is" but if you want Combination like Shift-Ctrl-Alt ...

Code: Select all  Expand view
METHOD DXE_KbWin:SendKey( cKeys, lShift, lCtrl, lAlt, lAltGR )
LOCAL i     := 0
LOCAL nCode := 0

   DEFAULT lShift TO .F.
   DEFAULT lCtrl TO .F.
   DEFAULT lAlt TO .F.
   DEFAULT lAltGR TO .F.

   IF cKeys # NIL
      ::SetTheFocus() // App <-> OSK

      IF VALTYPE( cKeys ) == "C"
         // for each Key in String
         FOR i := 1 TO LEN( cKeys )
            // single key
            nCode := GetVirtualKeyCode( cKeys[ i ], @lShift, @lCtrl, @lAlt, @lAltGR )

            IF lShift
               keybd_event( VK_SHIFT, 0, 0, 0 )
            ENDIF
            IF lCtrl
               keybd_event( VK_CONTROL, 0, 0, 0 )
            ENDIF
            IF lAlt
               keybd_event( VK_MENU, 0, 0, 0 )
            ENDIF
            IF lAltGR
               keybd_event( VK_RMENU, 0, 0, 0 )
            ENDIF

            // now send "the" key
            keybd_event( nCode, 0, 0, 0 )
            keybd_event( nCode, 0, KEYEVENTF_KEYUP, 0 )

            // clean up
            IF lAltGR
               keybd_event( VK_RMENU, 0, KEYEVENTF_KEYUP, 0 )
               lAltGR := .F.
            ENDIF
            IF lAlt
               keybd_event( VK_MENU, 0, KEYEVENTF_KEYUP, 0 )
               lAlt := .F.
            ENDIF
            IF lCtrl
               keybd_event( VK_CONTROL, 0, KEYEVENTF_KEYUP, 0 )
               lCtrl := .F.
            ENDIF
            IF lShift                                  
               keybd_event( VK_SHIFT, 0, KEYEVENTF_KEYUP, 0 )
               lShift := .F.
            ENDIF
         NEXT

      ELSEIF VALTYPE( cKeys ) == "N"  // NumPad ( hide/show )
         ...
 


Code: Select all  Expand view
FUNCTION GetVirtualKeyCode( cChar, lShift, lCtrl, lAlt, lAltGR )
LOCAL nCode
LOCAL nHiByte

   nCode := VkKeyScanA( ASC( cChar ) )

   nHiByte := HiByte( nCode )
   lShift := ( nHiByte = 1 )
   lCtrl := ( nHiByte = 2 )
   lAlt := ( nHiByte = 4 )
   lAltGR := ( nHiByte = 6 )

RETURN LoByte( nCode )

DLLFUNCTION VkKeyScanA( cChar ) USING STDCALL FROM USER32.DLL
 


---

on a Table PC "own" OSK must change Position / Size when turn 90° from Landsacpe <-> Portrait

---

also Form must be resize able and "own" OSK must be "visible" to reach it

---

on my 310 Miix with 10" Full-HD i still have Problem with my (big) Finger to type into OSK
on a 22" HP All-in-One with Full-HD it is easy to hit right Key

so i use 310 Miix "real" Keyboard or Bluetooth "Laser Keyboard" when i need to "write"
greeting,
Jimmy
User avatar
Jimmy
 
Posts: 1732
Joined: Thu Sep 05, 2019 5:32 am
Location: Hamburg, Germany

Previous

Return to FiveWin for Harbour/xHarbour

Who is online

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