FiveTech Software tech support forums

... the "SAY" the virtual keyboard works fine and I stuff the m_TextString var with the real keyboard data using oDlg:bKeyDown := { | nKey | KEYSEEK(nKey)} . The alpha works (but returns only CAPS), and I get different symbols on the punctuation keys and the numeric keypad. *** This is may ...

... 80, 200 ; ID 101 OF oDlg ; ON DBLCLICK ( xrta:=BUSQ->CODCPT, xok:=1, ODLG:END() ) ; ON CLICK ( xrta:=BUSQ->CODCPT ) oLbx:bkeyChar :={|nKey| KeySeek(nKey,oLbx,390) , ; oLbx:SetFocus(),oLbx:Refresh() } REDEFINE GET oBUSCA VAR xBUSCA ID 130 of oDlg FONT OFNTARIAL REDEFINE BUTTON oBt3 ACTION ...

Hola. Tengo un programa que efectura una busqueda de la siguiente manera: tengo un listbox con un keyseek, donde puedo buscar a medida que escribo, y debajo un get para ingresar un texto, y un boton que dice "FILTRAR"; si pongo en el get, "tornillo", ...

Diego,

> esto del keyseek ya lo solucione.

Cómo lo solucionastes ? te agradecemos si compartes con todos la solución, gracias

> Me podras contestar el otro msg???

Cual es ?

Hola, Antonio. Sabes, esto del keyseek ya lo solucione. Me podras contestar el otro msg??? el de poder editar gets como en el word. Ahora si hago clic sobre el get, no tengo que poner insert, y ademas, el cursor, si pico en algun lugar en ...

Hola. Tengo la siguiente funcion asociada a un list box: olbx:bKeyDown:={|nKey|KeySeek(nKey,olbx)} y la funcion keyseek: Function KeySeek(nKey,olbx) SET SOFTSEEK ON IF nKey = 8 // Reset on BackSpace Key oString := "" go top olbx:Upstable() ELSE IF (nKey = 32) .OR. ...

Tim,

func KeySeek you only need once.

But what serves short code if as you wrote:

> but I do notice it can be slow to load and it flickers.

 loads slowly, and it has not been updated in quite awhile, so it can lose compatibility with other improvements
Regards,
Otto

... 0.3,38 GET oSay VAR cFind OF oBar SIZE 160,26 UPDATE READONLY oLbx:bkeyChar :={|nKey|iif(nKey == K_ENTER, ; prn_RgKOPIE(nhorzM,nVertM), ; cFind := KeySeek(nKey,oLbx_PR,oSay,@cFind) ) , ; oLbx:SetFocus(),oLbx:Refresh() } oLbx:bChange := {|| cFind := "" , oSay:Refresh() } oLbx:aActions = Array( ( ...