Como puedo solucionar el siguiente problemita?
http://hyperupload.com/download/027902a ... l.bmp.html
[/img]
Como puedo solucionar el siguiente problemita?
http://hyperupload.com/download/027902a ... l.bmp.html
[/img]
perdon, aqui va la direccion
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
Ricardo,
Las imágenes puedes alojarlas en www.imageshack.us y copiar aquí el enlace que te proporcionan.
Me está ocurriendo el mismo problema.
Aquí está el enlace con la imagen :
http://hyperupload.com/download/02008d0 ... e.bmp.html
Un saludo,
Manuel
Manuel,
Por favor pon la imagen en www.imageshack.us y publica aqui la dirección que te da, gracias
Esta es la dirección de la imagen:
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
Manuel,
Aún no. Lo tenemos pendiente de revisar cuanto antes.
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
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
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
Hola
Podrias poner una pedazo de tu codigo para poder verlo, yo utilizo xbrowse y me funciona perfectamente.
Saludos
Marco A. Delgado.
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
//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