Page 1 of 1

xBrowse con Tabla MariaDb

PostPosted: Tue Feb 16, 2016 2:06 pm
by MarioG
Gente;
Se me presenta un pequeño problema en el SAY de la búsqueda
O sea, el proceso se realiza correctamente. Lo que ocurre es que no se refresca el SAY donde se muestra el texto ingresado
A ver si la figura lo explica mejor
Image
Aquí ingrese como texto de búsqueda RODRIGUEZ, y como dije, el puntero se posicionó correctamente. Luego, moví el cursor y el SAY no se limpió.
Tampoco lo hace si intento borrar con backspace.
Luego, ingrese el texto para otra búsqueda... y esto es lo que sucede
Image

Uso FW 1204 (puede pasar por ahí el problema?)

El código
Code: Select all  Expand view
  REDEFINE XBROWSE oBrw ID BRW_XBRW OF oDlg AUTOSORT ;
            COLUMNS "dnit1", "tutor1",   "dnit2", "tutor2" ;
            HEADERS "dni1",  "apeynom1", "dni2",  "apeynom2" ;
            OBJECT ::oQryT
   ...
   REDEFINE SAY oBrw:oSeek PROMPT oBrw:cSeek ID 10 OF oDlg COLOR CLR_MARCO1 UPDATE

 

Re: xBrowse con Tabla MariaDb

PostPosted: Wed Feb 17, 2016 2:27 am
by cmsoft
Proba con
Code: Select all  Expand view
REDEFINE SAY oBrw:oSeek PROMPT "" ID 10 OF oDlg COLOR CLR_MARCO1 UPDATE

Re: xBrowse con Tabla MariaDb

PostPosted: Wed Feb 17, 2016 3:29 am
by joseluisysturiz
De esta forma me trabaja como quieres...
Code: Select all  Expand view

   REDEFINE SAY oBrw:oSeek VAR oBrw:cSeek ;  // BUSQUEDA INCREMENTAL
      COLOR nRGB( 255, 255, 255 ), nRGB( 128, 128, 255 ) ID 102 OF oDlg
 


mi consulta es, hay manera de que en vez de un SAY sea un GET con su cursor titilando.? esto del SAY a veces los usuarios cuando corrigen el texto escrito con el BACKSPACE no se nota bien visualmente ya que con el SAY no se muestra cursor retrocediendo, por lo menos como lo tengo hecho, gracias, saludos... :shock:

Re: xBrowse con Tabla MariaDb

PostPosted: Wed Feb 17, 2016 2:42 pm
by MarioG
CM... gracias; no lo resuelve

José: no veo la diferencia entre tu código y el mío (solo el orden de las cláusulas). Lo estas usando con MySQL?
Agrego y aclaro, lo uso desde hace bastante con otras aplicaciones con DBFs y funciona correctamente

Re: xBrowse con Tabla MariaDb

PostPosted: Thu Feb 18, 2016 2:37 am
by joseluisysturiz
MarioG wrote:CM... gracias; no lo resuelve

José: no veo la diferencia entre tu código y el mío (solo el orden de las cláusulas). Lo estas usando con MySQL?
Agrego y aclaro, lo uso desde hace bastante con otras aplicaciones con DBFs y funciona correctamente


Si, lo uso con Mysql, fijate que no uso el PROMPT, pero no creo eso tenga algo q ver...revisastes bien tu Query.? saludos... :shock:

Re: xBrowse con Tabla MariaDb

PostPosted: Thu Feb 18, 2016 12:21 pm
by acuellar
Mario
Lo tengo igual al tuyo
Code: Select all  Expand view

REDEFINE SAY oBrw:oSeek PROMPT oBrw:cSeek ID 114 OF oDlg UPDATE PICTURE "@!"
 


Me parece que es tu versión de FWH
Antes lo usaba con ésta función:
Code: Select all  Expand view

FUNCTION QSeek( c, oBrw, oSay )
   LOCAL oQry := oBrw:oMySql
   LOCAL cSortOrder, nStart
   LOCAL uData, nNum, lRet

   STATIC aLastRec := {}
 
   nNum := AScan( oBrw:aCols, {| o | !Empty( o:cOrder ) } )

   IF nNum < 1
     nNum:=1
   ENDIF
   
   cSortOrder := oBrw:aCols[ nNum ]:cSortOrder
   
   IF Len( c ) == 1
      aLastRec := {}
   ENDIF
 
   IF Len( aLastRec ) < Len( c )
      IF Len( aLastRec ) == 0
         nStart := 1
      ELSE
         nStart := oQry:RecNo()
      ENDIF
      AAdd( aLastRec, nStart )
   ELSE
      ASize( aLastRec, Len( c ) - 1 )
     
      IF Len( aLastRec ) == 0
          nStart := 1
      ELSE
         nStart := ATail( aLastRec )
      ENDIF
   ENDIF

   lRet  := ( oQry:Seek( c, cSortOrder, nStart, oQry:LastRec(), .T., .T. ) != 0 )
   If !lRet
     Return .F.
   Endif
 
RETURN lRet
 


Espero te ayude.

Saludos,

Adhemar

Re: xBrowse con Tabla MariaDb

PostPosted: Thu Feb 18, 2016 1:15 pm
by MarioG
Gracias! gente
Me inclino por pensar que es mi version de FWH

Re: xBrowse con Tabla MariaDb

PostPosted: Thu Feb 18, 2016 2:52 pm
by joseluisysturiz
REPITO PREGUNTA:

mi consulta es, hay manera de que en vez de un SAY sea un GET con su cursor titilando.? esto del SAY a veces los usuarios cuando corrigen el texto escrito con el BACKSPACE no se nota bien visualmente ya que con el SAY no se muestra cursor retrocediendo, por lo menos como lo tengo hecho, gracias, saludos... :shock:

Re: xBrowse con Tabla MariaDb

PostPosted: Fri Feb 19, 2016 12:56 am
by MarioG
José
Se me ocurre que quizás podes probar con SSay de R.Avendaño (tengo los fuentes).
Aunque no recuerdo si tiene opción de parpadeo

Re: xBrowse con Tabla MariaDb

PostPosted: Fri Feb 19, 2016 4:42 am
by joseluisysturiz
MarioG wrote:José
Se me ocurre que quizás podes probar con SSay de R.Avendaño (tengo los fuentes).
Aunque no recuerdo si tiene opción de parpadeo

Esta bien lo que me dices, pero igual eso no responde mi pregunta...creo seria mejor si fuese un GET...que hasta se le pudiese poner el boton action, como por lo menos crear el indice o no se..cualquier cosa buena se nos ocurrira, solo lo dejo como observacion para los expertos del xBrowse o para Mr. Rao, saludos...gracias...