FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour xbrowse - reconocimientos del 1° caracter de codigo barra
Posts: 72
Joined: Tue Oct 02, 2012 04:36 PM
xbrowse - reconocimientos del 1° caracter de codigo barra
Posted: Fri Nov 21, 2014 09:31 PM
Amigos...

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

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 (fw): Select all Collapse
  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)
Posts: 72
Joined: Tue Oct 02, 2012 04:36 PM
Re: xbrowse - reconocimientos del 1° caracter de codigo barra
Posted: Sat Nov 22, 2014 02:02 PM

:roll:

Posts: 72
Joined: Tue Oct 02, 2012 04:36 PM
Re: xbrowse - reconocimientos del 1° caracter de codigo barra
Posted: Tue Nov 25, 2014 10:04 PM

Estimados

Alguna sugerencia de como hacerlo ??

muchas gracias

David

Posts: 21
Joined: Tue Oct 11, 2005 09:42 PM
Re: xbrowse - reconocimientos del 1° caracter de codigo barra
Posted: Wed Nov 26, 2014 11:44 PM

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
Posts: 72
Joined: Tue Oct 02, 2012 04:36 PM
Re: xbrowse - reconocimientos del 1° caracter de codigo barra
Posted: Thu Nov 27, 2014 11:02 PM

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

Continue the discussion