FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Pintado de Xbrowse
Posts: 158
Joined: Tue Oct 11, 2005 03:10 PM
Pintado de Xbrowse
Posted: Fri Jun 16, 2006 05:22 AM

Como puedo solucionar el siguiente problemita?

http://hyperupload.com/download/027902a ... l.bmp.html

[/img]

Posts: 158
Joined: Tue Oct 11, 2005 03:10 PM
Pintado de Xbrowse
Posted: Fri Jun 16, 2006 05:30 AM
Posts: 158
Joined: Tue Oct 11, 2005 03:10 PM
Pintado de Xbrowse
Posted: Fri Jun 16, 2006 05:33 AM

Disculpen, pero no he podido enviar la imagen, para que me puedan ayudar. Pero el caso es que al estar dentro del browse:

Cuando se esta en la primer columna de la primera linea, todo ok, pero cuando en esa misma linea se oprime FLECHA DERECHA, la linea se "COME" parte del SCROLL VERTICAL, asi que al oprimir la FLECHA ABAJO, el SCROLL VERTICAL se ve mal.

XHARBOUR

Gracias

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Pintado de Xbrowse
Posted: Fri Jun 16, 2006 05:48 AM

Ricardo,

Las imágenes puedes alojarlas en www.imageshack.us y copiar aquí el enlace que te proporcionan.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Pintado de Xbrowse
Posted: Fri Sep 29, 2006 12:15 PM

Me está ocurriendo el mismo problema.
Aquí está el enlace con la imagen :

http://hyperupload.com/download/02008d0 ... e.bmp.html

Un saludo,
Manuel

Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Pintado de Xbrowse
Posted: Fri Sep 29, 2006 12:18 PM

Manuel,

Por favor pon la imagen en www.imageshack.us y publica aqui la dirección que te da, gracias

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Pintado de Xbrowse
Posted: Fri Sep 29, 2006 12:36 PM

Esta es la dirección de la imagen:

http://img133.imageshack.us/img133/8103/pintadozh6.jpg

Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Pintado de Xbrowse
Posted: Thu Oct 05, 2006 06:02 PM

Hola de nuevo Antonio,
¿ Hay algo nuevo sobre este asunto ?

http://img512.imageshack.us/img512/1092/pintadolb5.png

El efecto queda bastante antiestético.

Un saludo,
Manuel

Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Pintado de Xbrowse
Posted: Thu Oct 05, 2006 07:45 PM

Manuel,

Aún no. Lo tenemos pendiente de revisar cuanto antes.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Pintado de Xbrowse
Posted: Wed Nov 01, 2006 10:20 AM

Estimado Antonio:

Esperaba que en la construcción de Octubre estuviera solucionado este problema. Creo haber concluído con éxito el paso de FW a FWH y solo me queda este punto. Estarás conmingo en que queda bastante antiestético
¿no?

Un saludo,
Manuel

Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 189
Joined: Wed Apr 05, 2006 09:48 PM
Pintado de Xbrowse
Posted: Wed Nov 01, 2006 06:05 PM

Eso es un fallo del algun hdc que no lo pinta bien , el xbrowse funciona mal desde principio, nunca ha funcionado bien, esta clase ha sido una de las que mas dolores de cabeza me ha dado y hace unos meses que la quita de un sistema que tengo, falla por todos sitios, yo utilizaria el twbrowse de Hernan.

Antonio tendria que revisar toda la clase completamente.

Un saludo

Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Pintado de Xbrowse
Posted: Wed Nov 01, 2006 09:46 PM

Pues la verdad es que el "bug" se reportó por primera vez hace más de cuatro meses, por lo que la solución no debe ser fácil. De cualquier manera, hasta ahora es el único problema que he encontrado en TXBrowse y de momento, me resisto a utilizar clases ajenas al producto original, a menos que no me quede más remedio, claro.

Saludos,
Manuel

Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 126
Joined: Fri Oct 07, 2005 04:20 PM
Pintado de Xbrowse
Posted: Wed Nov 01, 2006 11:05 PM

Hola

Podrias poner una pedazo de tu codigo para poder verlo, yo utilizo xbrowse y me funciona perfectamente.

Saludos
Marco A. Delgado.

Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Pintado de Xbrowse
Posted: Thu Nov 02, 2006 08:38 AM
Me ocurre solo en los controles creados desde recursos. Además Antonio me ha contestado que están pendientes de revisar el código, por lo que creo que es sabedor de esta anomalía. No obstante ahí va el código por si acaso vieras algo raro:
  
DEFINE DIALOG oDlg RESOURCE "MENUDATO" TITLE cTitulo FONT oFont1
   oDlg:lHelpIcon:=.F.
   oLbx := TXBrowse():New(oDlg)
   oLbx:nMarqueeStyle       := MARQSTYLE_HIGHLROW
   oLbx:nColDividerStyle    := LINESTYLE_BLACK
   oLbx:lColDividerComplete := .t.
   oLbx:nHeaderLines      := 1
   oLbx:nFooterLines      := 1
   oLbx:nDataLines        := 1
   oLbx:CreateFromResource(200)
   oLbx:lFooter           := .t.
   oLbx:nFreeze           := 3
   oLbx:bClrStd := { || {CLR_BLACK,SelColor2(Trabaja->NumTrabaja+"-"+Trabaja->NombreTra,aSeleccion),CLR_WHITE } }
   oLbx:bkeydown:={|nKey|DOKEYCHECK(nKey,oLbx,oBtn7,cUsaBase,nSerie,nRango)}
   //
   oCol := oLbx:AddCol()
   oCol:AddResource("LEVELB")
   oCol:AddResource("LEVELR")
   oCol:bBmpData   := { || IIF(ASCAN(aSeleccion,TRABAJA->NumTrabaja+"-"+TRABAJA->NombreTra)=0,1,2 ) }
   oCol:cHeader   := "S"
   AADD(aCols,1)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || TRABAJA->NumTrabaja}
   oCol:cHeader   := OemtoAnSi("N£m.")
   oCol:oDataFont := oFont1
   AADD(aCols,2)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || SUBSTR(TRABAJA->NombreTra,1,33)}
   oCol:cHeader   := "   Apellidos y Nombre"
   oCol:oDataFont := oFont1
   AADD(aCols,3)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || STR(TRABAJA->TTipoDo)}
   oCol:cHeader   := "T"
   oCol:oDataFont := oFont1
   AADD(aCols,4)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || TRABAJA->DniTra}
   oCol:cHeader   := "    N.I.F."
   oCol:oDataFont := oFont1
   AADD(aCols,5)
      //
   oCol := oLbx:AddCol()
   oCol:AddResource("LEVELB")
   oCol:AddResource("LEVELA")
   oCol:AddResource("LEVELY")
   oCol:bBmpData   := { || IIF(TRABAJA->FijoEven="F",2,IIF(TRABAJA->COrigen,3,1 ) ) }
   oCol:cHeader   := "F/E"
   AADD(aCols,6)
   //
   oCol := oLbx:AddCol()
   oCol:AddResource("LEVELB")
   oCol:AddResource("LEVELAZ")
   oCol:bBmpData   := { || IIF(TRABAJA->Anotacion=" ",1,2 )}
   oCol:cHeader   := "Not."
   AADD(aCols,7)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || TRABAJA->Naftra}
   oCol:cHeader   := "  Núm.Afiliación"
   oCol:oDataFont := oFont1
   AADD(aCols,8)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || TRABAJA->TelefoTra}
   oCol:cHeader   := "Teléfono"
   oCol:oDataFont := oFont1
   AADD(aCols,9)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || TRABAJA->CPosTra}
   oCol:cHeader   := "C.Postal"
   oCol:oDataFont := oFont1
   AADD(aCols,10)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || TRABAJA->LocaTra}
   oCol:cHeader   := " Localidad"
   oCol:oDataFont := oFont1
   AADD(aCols,11)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || TRABAJA->ProvinTra}
   oCol:cHeader   := " Provincia"
   oCol:oDataFont := oFont1
   AADD(aCols,12)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || +TRABAJA->HM}
   oCol:cHeader   := "H/M"
   oCol:oDataFont := oFont1
   AADD(aCols,13)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || DTOC(TRABAJA->NaciTra)}
   oCol:cHeader   := "F.Nacmto."
   oCol:oDataFont := oFont1
   AADD(aCols,14)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || +TRABAJA->GrupoCo}
   oCol:cHeader   := "G.Cot."
   oCol:oDataFont := oFont1
   AADD(aCols,15)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || +TRABAJA->Catetra}
   oCol:cHeader   := "Categ. Prof."
   oCol:oDataFont := oFont1
   AADD(aCols,16)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || +TRABAJA->TCodicon}
   oCol:cHeader   := "Contrato"
   oCol:oDataFont := oFont1
   AADD(aCols,17)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || +TRABAJA->TipoCon}
   oCol:cHeader   := "Tipo Contrato"
   oCol:oDataFont := oFont1
   AADD(aCols,18)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || +TRABAJA->Estudios}
   oCol:cHeader   := "Estudios"
   oCol:oDataFont := oFont1
   AADD(aCols,19)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || +TRABAJA->CodiProTra}
   oCol:cHeader   := "Cód.Prov."
   oCol:oDataFont := oFont1
   AADD(aCols,20)
   //
   oCol := oLbx:AddCol()
   oCol:bStrData  := { || +TRABAJA->SgTra+"  "+ALLTRIM(TRABAJA->DomiTra)+"   "+TRABAJA->NumDoTra+"  "+TRABAJA->EscaTra+"  "+TRABAJA->PisoTra+"  "+TRABAJA->PuertaTra}
   oCol:cHeader   := " Domicilio"
   oCol:oDataFont := oFont1
   AADD(aCols,21)
   //
   //
   for nFor := 1 to len(aCols)
      oLbx:aCols[ nFor ]:blDClickData  := {|| (Trabajadores(oLbx,"Ver/Modificar datos",.F.,nSerie),oLbx:Refresh() ) }
      oLbx:aCols[ nFor ]:bRClickData   := {|| (Seleccionar(oLbx),oLbx:refresh(),IIF(LEN(aSeleccion) > 0,oBtn7:enable(),oBtn7:disable())   ) }
   next
   //


Saludos,
Manuel
Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 1076
Joined: Fri Oct 07, 2005 10:41 PM
Pintado de Xbrowse
Posted: Thu Nov 02, 2006 09:10 AM
Manuel Aranda wrote:Me ocurre solo en los controles creados desde recursos. Además Antonio me ha contestado que están pendientes de revisar el código, por lo que creo que es sabedor de esta anomalía. No obstante ahí va el código por si acaso vieras algo raro:

Saludos,
Manuel


Manuel,

No veo nada raro en tu código, aunque :CreateFromResource, usualmente lo coloco al fnal de la creación de las columnas, y tampoco he tenido problemas con xBrowse.
William, Morales

Saludos



méxico.sureste