topic-1226

Board index FiveWin for Harbour/xHarbour wbrowse ----> xbrowse

Posts: 3107

Joined: Fri Oct 07, 2005 06:28 PM

wbrowse ----> xbrowse
Posted: Thu Jan 12, 2006 12:37 AM

With Wbrowse( ceccarelli) I used a function to use user functions

   oBlistbox:bKeyDown:={|nKey| Val_nKey(nKey)}

and then this function
….

Code: Select all Collapse

STAT FUNC Val_nKey(nKey)

   DO CASE

      CASE nKey==VK_INSERT .AND. lABC

         KeyToggle(VK_INSERT)

         Captura(.T.)

      CASE nKey==VK_DELETE .AND. lABC

         Sup_Movs()

      CASE nKey==VK_RETURN .AND. lABC

         Captura(.F.)

      CASE nKey==VK_F9

         Sel_Pict()

      CASE nKey==Asc('I') .AND. GetKeyState(VK_CONTROL)

         Imprimir(.F.)

      CASE nKey==Asc('P') .AND. GetKeyState(VK_CONTROL)

         Imprimir(.T.)

   ENDCASE

RETURN (NIL)

on Xbrowse How I can make it ?

regards

Best Regards, Saludos

Falconi Silvio

VeRCE

Posts: 219

Joined: Fri Nov 04, 2005 02:34 PM

wbrowse ----> xbrowse
Posted: Thu Jan 12, 2006 03:54 PM

The same way silvio.

Regards

Juan Carlos Salinas Ojeda

México. D.F.

-------------------------------------------------

Silvio

Posts: 3107

Joined: Fri Oct 07, 2005 06:28 PM

wbrowse ----> xbrowse
Posted: Thu Jan 12, 2006 04:18 PM

Dear Jcso ,
the same not run ok ...

Best Regards, Saludos

Falconi Silvio

VeRCE

Posts: 219

Joined: Fri Nov 04, 2005 02:34 PM

wbrowse ----> xbrowse
Posted: Thu Jan 12, 2006 06:54 PM

Silvio wrote:Dear Jcso ,
the same not run ok ...

Check your code, it must run ok.

Juan Carlos Salinas Ojeda

México. D.F.

-------------------------------------------------

FiveTech Support Forums

Continue the discussion