scroll en wbrowse 1.7 de Hernán

scroll en wbrowse 1.7 de Hernán

Postby surGom » Mon Feb 18, 2008 2:58 pm

Hola a todos, porque cuando me posiciono sobre la flechita del scroll vertical de browse, cuando llego al tope o al fin de la vista no me refresca el browse y va cambiando solo la línea. Estuve buscando en los mensajes viejos del foro pero no pude encontrar nada al respecto.
Utilizo fwh26 Xharbour 0.99.61 y el Browse de Hernán

Gracias
surGom
 
Posts: 640
Joined: Wed Oct 19, 2005 12:03 pm

Postby ADBLANCO » Mon Feb 18, 2008 6:05 pm

Puedes poner el codigo donde se te comporta así
User avatar
ADBLANCO
 
Posts: 299
Joined: Mon Oct 22, 2007 3:03 pm
Location: Valencia - Venezuela

Postby surGom » Tue Feb 19, 2008 10:36 am

Se reproduce el error en todos los casos que utilizo el wbrowse sea con campos como con vectores, hace como dos años que utilizan el sistema y nunca me había percatado del error, el sistema funcionaba antes con fw 16 bits y no había problemas, el wbrowse es la publicada en el foro

Gracias


REDEFINE LISTBOX oLbx FIELDS (oProex:calias)->proveedor, transform((oProex:calias)->forigen,"@d"),;
(oProex:calias)->factura ,transform((oProex:calias)->importe,"@e 999,999.99"),;
transform((oProex:calias)->valordol,"@e 999,999.99"),(oProex:calias)->remito,;
transform((oProex:cAlias)->fecha_f,"@d"),(oProex:calias)->cobranza,(oProex:calias)->despacho;
id 108 ON DBLCLICK cambio(oLbx,.f.,oProex) of odlg

oLbx:aheaders:= {"Proveedor","F. Factura","Factura","Importe","u$s","Remito","Fecha","Cobranza","Despacho"}
oLbx:aJustify := {HA_LEFT,HA_RIGHT,HA_LEFT,HA_RIGHT,HA_RIGHT,HA_RIGHT,HA_RIGHT,HA_RIGHT,HA_RIGHT}
oLbx:aHJustify :={HA_CENTER,HA_CENTER,HA_CENTER,HA_CENTER,HA_CENTER,HA_CENTER,HA_CENTER,HA_CENTER,HA_CENTER}
oLbx:aColSizes := {170,80,85,80,85,110,92,85,130 }
oLbx:bSkip = { | nRecs | oProex:Skipper( nRecs ) }
oLbx:nLineStyle := 3
oLbx:lAdjlastcol:= .T.
oLbx:nClrBackFocus := CLR_CYAN
oLbx:nClrForeFocus := CLR_WHITE
oLbx:nClrPane := { || iif(!empty(oProex:dolar),rgb(175,221,245),rgb(255,255,255)) }
surGom
 
Posts: 640
Joined: Wed Oct 19, 2005 12:03 pm

Postby ADBLANCO » Tue Feb 19, 2008 5:17 pm

prueba definiendo:

oLbx:cAlias:=oProex:calias
Saludos

Angel, Valencia, Venezuela

xH .997 - FW 7.9 - BCC55 - WorkShop - MySql
User avatar
ADBLANCO
 
Posts: 299
Joined: Mon Oct 22, 2007 3:03 pm
Location: Valencia - Venezuela

Postby surGom » Wed Feb 20, 2008 10:18 am

No así tampoco. este código es la copia de otro hecho en 16 bits y funciona correctamente, en wbrowse de Hernán dice estar reparado este bug, pero...
fwh2.6, xharbour .99.61, workshop, verce.

Gracias
surGom
 
Posts: 640
Joined: Wed Oct 19, 2005 12:03 pm

Postby ADBLANCO » Wed Feb 20, 2008 1:02 pm

A mi se presento ese problema y era que desconocía la tabla, (en mysql)
y logré corregirla con
oLbx2:cAlias := "ARRAY"
Pero no creo que sea tu caso
Saludos

Angel, Valencia, Venezuela

xH .997 - FW 7.9 - BCC55 - WorkShop - MySql
User avatar
ADBLANCO
 
Posts: 299
Joined: Mon Oct 22, 2007 3:03 pm
Location: Valencia - Venezuela

Postby Francisco Horta » Thu Feb 21, 2008 5:50 pm

surgom,

a mi no me pasa eso, y lo uso asi:
REDEFINE LISTBOX oBTmp ;
FIELDS Rg_Bmp(cBmp),;
(oDTmp)->TMP_DESCRI,;
Rg2_Bmp(cBmp2),;
Tran((oDTmp)->TMP_CANTID,"999,999.999"),;
Tran((oDTmp)->TMP_PREUNI,"9999,999.99"),;
Tran((oDTmp)->TMP_IMPORT,"9999,999.99") ;
HEADERS "","D E S C R I P C I O N","","CANT","PRECIO","IMPORTE" ;
SIZES 16,262,17,64,77,82 ;
ON DBLCLICK ( IF(oBTmp:nAtCol(nCol)==1,BorraPartidas(),) ) ;
WHEN (!DbEmpty(oDTmp) .AND. !lPago) ID 108 OF oDlg

oBTmp:cAlias := oDTmp
oBTmp:SetFont(oFnt[2])
oBTmp:bLogicLen := { || (oDTmp)->(OrdKeyCount()) }
oBTmp:aHJustify := { 2,2,2,2,2,2 }
oBTmp:aJustify := { 2,0,2,1,1,1 }
oBTmp:lAdjLastCol := .F.
oBTmp:lDrawFocusRect:= .T.
oBTmp:nHeaderHeight := 32
Francisco Horta
 
Posts: 845
Joined: Sun Oct 09, 2005 5:36 pm
Location: la laguna, mexico.

Postby surGom » Thu Feb 21, 2008 7:47 pm

Antes que nada, les pido disculpas a todos los que se interesaron en el problema que me surgió. El error radicaba en que mi compilación (en la oficina) había agregado hace un tiempo wbrowse en el script, ya que estaba haciendo unas pruebas... y me olvidé. Como también trabajo en mi casa y en la empresa que usa el software, no me percataba del error ya que en la empresa llevo en un pendrive las fuentes y los compiladores en los cuales no hacía la llamada al wbrowse y sólo utilizaba la librería que contiene enlazados los prg del wbrowse.
Les pido mil disculpas por mi distracción

Luis
surGom
 
Posts: 640
Joined: Wed Oct 19, 2005 12:03 pm

Postby ADBLANCO » Fri Feb 22, 2008 12:59 pm

:wink: No te preocupes, eso ocurre hasta en las mejores Familias!
Saludos

Angel, Valencia, Venezuela

xH .997 - FW 7.9 - BCC55 - WorkShop - MySql
User avatar
ADBLANCO
 
Posts: 299
Joined: Mon Oct 22, 2007 3:03 pm
Location: Valencia - Venezuela


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 70 guests