xbrowse - reconocimientos del 1° caracter de codigo barra

Post Reply
davidObarrio
Posts: 72
Joined: Tue Oct 02, 2012 4:36 pm

xbrowse - reconocimientos del 1° caracter de codigo barra

Post by davidObarrio »

Amigos...

Tengo un xbrowse y quisiera analizar el 1° carácter que escriben para una búsqueda incremental.... 8)

La idea es que cuando escriban el primer carácter o el 1° carácter de una lectura de código barra coloque o sea # ejecutar una función.....

se podrá ? :?:

muchas gracias

David

Code: Select all

  DbSelectArea(MAEDOCU)
    
  @ 1.000,1 XBROWSE oLbxDocu ;
              FIELDS (MAEDOCU)->DETALLE ,;
                     (MAEDOCU)->IDENDOC ,;
                     (MAEDOCU)->CDDOCNO ;  
              HEADERS 'Nombre' ,;
                      'Identificacion' ,;
                      'Doc.de Ref.' ;
              SIZES 450,120,80 ;
                  SIZE 349,170 ;
                  ON DBLCLICK (If(Ops_Selc=0,(lSelec:=.t.,oDlgDocuVige:End()), ) ) ;
              ALIAS MAEDOCU ;
              AUTOSORT CELL LINES NOBORDER ;
              OF oDlgDocuVige 

  oLbxDocu:nRowDividerStyle = LINESTYLE_NOLINES
  oLbxDocu:nColDividerStyle = LINESTYLE_BLACK
  oLbxDocu:nMarqueeStyle = MARQSTYLE_HIGHLROW
*  oLbxDocu:CreateFromCode()

  oLbxDocu:lHScroll := .F.
*  oLbxDocu:lVScroll := .F.

  WITH OBJECT oLbxDocu
      :lIncrFilter      := .t.
      :lSeekWild        := .t.
      //
      :CreateFromCode()
  END

  @ 18,1 SAY oLbxDocu:oSeek PROMPT oLbxDocu:cSeek SIZE 100,10 Of oDlgDocuVige ;
                           COLOR CLR_BLACK,RGB(207,222,244)  
davidObarrio
Posts: 72
Joined: Tue Oct 02, 2012 4:36 pm

Re: xbrowse - reconocimientos del 1° caracter de codigo barra

Post by davidObarrio »

:roll:
davidObarrio
Posts: 72
Joined: Tue Oct 02, 2012 4:36 pm

Re: xbrowse - reconocimientos del 1° caracter de codigo barra

Post by davidObarrio »

Estimados

Alguna sugerencia de como hacerlo ??

muchas gracias

David
User avatar
Joao Cezar
Posts: 21
Joined: Tue Oct 11, 2005 9:42 pm
Location: Goiânia - GO - Brasil

Re: xbrowse - reconocimientos del 1° caracter de codigo barra

Post by Joao Cezar »

Ola

Tente assim:

oBrw:bKeyDown := {|nKey| TeclaPress(nkey) }
oBrw:bChange := {|| TeclaPress(0) }
[]´s

João Cezar - Brasil - Goiânia/GO.
FWH 14.09 - xHARBOUR 1.2.3 - WorkShop.Exe
davidObarrio
Posts: 72
Joined: Tue Oct 02, 2012 4:36 pm

Re: xbrowse - reconocimientos del 1° caracter de codigo barra

Post by davidObarrio »

Muchas gracias, por tu ayuda.....

el tema es que debo tener cargada toda la cadena de caracteres que me lee el código barra, y acá solo me analiza un carácter digitado.

la idea es que en la cadena de caracteres del codigo barra, el primer carácter es "_" y después viene 10 caracteres numéricos, y estando dentro del xbrowse si leen dicho código barra y al tenes el primer carácter "_" salgo a buscar los datos numéricos posteriores al "_"...

Seria una forma de búsqueda.....

Muchas gracias

David
Post Reply