FiveTech Software tech support forums

Hola, El refresco en la versión 7.1 cambia a las versiones anteriores Ahora hay que realizar lo siguiente: oBrw:ResetBarPos() // Actualiza cuantos registros tienen que mostrar para scroll, ctrl-Inicio, etc oBrw:UpStable() // Posiciona el puntero al principio y estabiliza el browse con los nuevos dat...

Hola Francisco,

En la definición del custom indica lo siguiente en "Style" 0x50810000, en lugar de tener 0x50000000 que es lo que da por defecto.

Antonio.

Gracias. En eso no había caido, seguramente se solucione. Lo probaré

Antonio,

Gracias por tu respuesta.

Yo ya lo tengo corregido, pero no sabía que eso provocaría error si internamente fwh llama a esa función.

Jose Luis, Ante todo gracias por tu respuesta. fijate que el error se produce al cerrar la ventana que genera msgrun(), eso es lo que no entiendo. Called from TDIALOG:END(0) Called from (b)ENABLE(550) Called from TCONTROL:CLICK(0) Called from TWINDOW:KEYCHAR(0) Called from TWINDOW:HANDLEEVENT(0) Cal...

Hola foro, Hay momentos en la actividad del programa en los que ejecuta el siguiente error. ________________________________________________________________________________ Error BASE/1.077 Error de argumento: .NOT. Argumentos : [ 1] = U Llamadas al Stack ____________________________________________...

Hola foro, aodata no devuelve los datas cuya longitud sea mayor o igual a 10 caracteres. aDatas = aOData( oObject ) He comprobado al ejecutar __ClassSel que a estos datas se anteponen el guión bajo (_Incidencia) cuando no lo tiene en la definición del data. aDatas := __ClassSel( oObject ) Esto hace ...

Hola Carlos, Son objetos distintos y por tanto no pueden traspasarse valores. Cada vez que creas un objeto este es totalmente indipendiente del resto que hayas creado, es como si crearas lo siguiente: aArray := {'Pepe', 'Pedro', 'Carlos'} aArray1 := aClone(aArray) aArray[1] := 'Luis' aArray2 := aClo...

Hola carlos, La llamada al método New() de la clase TSegunda no provoca la llamada al mismo método de la clase padre. Tienes que hacer tu que se llamara: METHOD New() CLASS TSegunda Super:New() RETURN Self o bien no definas el método New() dentro de la clase TSegunda. De esa forma la llamada a oSeg:...

Hola Angel, El problema viene porque no dectecta correctamente el final de browse si este no cubre toda la presentación. Tambien se soluciona en la definición de los codeblock ::bGoTop y ::bGoBottom. Que si son definidos si usas oDbf, aArray, TxtFile Yo las asigno valor en el método ResetBarPos() ::...

Hola Daniel.

de nada y gracias a ti por usarlo.

Hola,

Aqui tienes toda la tsbrowse 7.1 con los cambios que he realizado.

http://www.ghe-soft.com/fivewin/tsbrowse.rar

Hola grupo, Mas cambios en la tsbrowse 7.1 En mis browse's muestro datos mezclados de varias tablas y bChange siempre me ha dado problemas. He incluido 2 datas nuevos para ello, bDrawIni y bDrawFin. METHOD DrawLine( xRow ) CLASS TSBrowse local... //definición de las variables if ::bDrawIni<>NIL Eval...

Hola, Se que hay mas gente que ha variado la clase, si disponemos de esos cambios mejoraremos la clase entre todos. Mas cambios que he realizado (aparecen bajo el comentario fgondi) METHOD Edit( uVar, nCell, nKey, nKeyFlags, cPicture, bValid, nClrFore, ; nClrBack ) CLASS TSBrowse Local nRow, nHeight...

Hola foro, Uso la clase tsbrowse 7.1 y creo que todos conocemos sus problemas de refresco. Yo en concreto tenía problemas al pintar una única fila y no tener el foco sobre browse, Pintaba la fila vacia. He realizado cambios en el método lostfocus de la clases tsbrowse para corregir ese problema y ya...