¿Se puede alinear el text una celda distintamente del alineamiento de la
columna.???
Lo que pretendo es alinear una columna dependiendo de un valor.
¿Cómo puedo acceder a una celda en concreto????
Sería posible...
::oBrw:aCols[1]:aFilas[n]: y aquí la propiedad que desee modificar...
nClrPane, nAlignment, etc...
Gracias.
Un Saludo,
Xevi
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Alinear celda del Browse
-
ignacio
- Site Admin
- Mensajes: 9469
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
Alinear celda del Browse
Xevi,
De forma sencilla se se pueden cambiar el propio texto, el color del mismo y
el color de fondo. Mira el evento TBrwColumn:OnDrawCell.
No lo he probado pero si cambias en dicho evento la propiedad
oColumn:nAlignment es posible que puedas cambiar la alineación, pero ten en
cuenta que entonces deberás de restaurarlo para las filas siguientes, y la
única forma de hacerlo es estableciendo siempre la alineación en dicho
evento.
Saludos,
"Xevi" <xevicomas@terra.es> escribió en el mensaje
news:4346b680$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> ¿Se puede alinear el text una celda distintamente del alineamiento de la
> columna.???
>
> Lo que pretendo es alinear una columna dependiendo de un valor.
>
> ¿Cómo puedo acceder a una celda en concreto????
> Sería posible...
> ::oBrw:aCols[1]:aFilas[n]: y aquí la propiedad que desee modificar...
> nClrPane, nAlignment, etc...
>
>
> Gracias.
>
>
> Un Saludo,
> Xevi
>
>
De forma sencilla se se pueden cambiar el propio texto, el color del mismo y
el color de fondo. Mira el evento TBrwColumn:OnDrawCell.
No lo he probado pero si cambias en dicho evento la propiedad
oColumn:nAlignment es posible que puedas cambiar la alineación, pero ten en
cuenta que entonces deberás de restaurarlo para las filas siguientes, y la
única forma de hacerlo es estableciendo siempre la alineación en dicho
evento.
Saludos,
"Xevi" <xevicomas@terra.es> escribió en el mensaje
news:4346b680$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> ¿Se puede alinear el text una celda distintamente del alineamiento de la
> columna.???
>
> Lo que pretendo es alinear una columna dependiendo de un valor.
>
> ¿Cómo puedo acceder a una celda en concreto????
> Sería posible...
> ::oBrw:aCols[1]:aFilas[n]: y aquí la propiedad que desee modificar...
> nClrPane, nAlignment, etc...
>
>
> Gracias.
>
>
> Un Saludo,
> Xevi
>
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Alinear celda del Browse
Ignacio
El resultado es el esperado... unas filas/Columna a la derecha/izquierda...
METHOD Browse2Column1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite ) CLASS TFrmKitsCitroen
oSender:nAlignment := If( Len( cText ) = 8, taRIGHT, taLEFT )
RETURN Nil
PERO...
el Scroll Vertical entra en un Bucle, que no para de "destellar".
Le he añadido el LogDebug(),
METHOD Browse2Column1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite ) CLASS TFrmKitsCitroen
oSender:nAlignment := If( Len( cText ) = 8, taRIGHT, taLEFT )
LogDebug( cText )
RETURN Nil
y efectivamente, muestra repetidamente un mensaje en el DeBugger
Alguna sugerencia para, terminar este bucle???
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje news:4346bbf7$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Xevi,
>
> De forma sencilla se se pueden cambiar el propio texto, el color del mismo y
> el color de fondo. Mira el evento TBrwColumn:OnDrawCell.
>
> No lo he probado pero si cambias en dicho evento la propiedad
> oColumn:nAlignment es posible que puedas cambiar la alineación, pero ten en
> cuenta que entonces deberás de restaurarlo para las filas siguientes, y la
> única forma de hacerlo es estableciendo siempre la alineación en dicho
> evento.
>
> Saludos,
>
>
> "Xevi" <xevicomas@terra.es> escribió en el mensaje
> news:4346b680$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>> ¿Se puede alinear el text una celda distintamente del alineamiento de la
>> columna.???
>>
>> Lo que pretendo es alinear una columna dependiendo de un valor.
>>
>> ¿Cómo puedo acceder a una celda en concreto????
>> Sería posible...
>> ::oBrw:aCols[1]:aFilas[n]: y aquí la propiedad que desee modificar...
>> nClrPane, nAlignment, etc...
>>
>>
>> Gracias.
>>
>>
>> Un Saludo,
>> Xevi
>>
>>
>
>
>
--
El resultado es el esperado... unas filas/Columna a la derecha/izquierda...
METHOD Browse2Column1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite ) CLASS TFrmKitsCitroen
oSender:nAlignment := If( Len( cText ) = 8, taRIGHT, taLEFT )
RETURN Nil
PERO...
el Scroll Vertical entra en un Bucle, que no para de "destellar".
Le he añadido el LogDebug(),
METHOD Browse2Column1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite ) CLASS TFrmKitsCitroen
oSender:nAlignment := If( Len( cText ) = 8, taRIGHT, taLEFT )
LogDebug( cText )
RETURN Nil
y efectivamente, muestra repetidamente un mensaje en el DeBugger
Alguna sugerencia para, terminar este bucle???
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje news:4346bbf7$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Xevi,
>
> De forma sencilla se se pueden cambiar el propio texto, el color del mismo y
> el color de fondo. Mira el evento TBrwColumn:OnDrawCell.
>
> No lo he probado pero si cambias en dicho evento la propiedad
> oColumn:nAlignment es posible que puedas cambiar la alineación, pero ten en
> cuenta que entonces deberás de restaurarlo para las filas siguientes, y la
> única forma de hacerlo es estableciendo siempre la alineación en dicho
> evento.
>
> Saludos,
>
>
> "Xevi" <xevicomas@terra.es> escribió en el mensaje
> news:4346b680$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>> ¿Se puede alinear el text una celda distintamente del alineamiento de la
>> columna.???
>>
>> Lo que pretendo es alinear una columna dependiendo de un valor.
>>
>> ¿Cómo puedo acceder a una celda en concreto????
>> Sería posible...
>> ::oBrw:aCols[1]:aFilas[n]: y aquí la propiedad que desee modificar...
>> nClrPane, nAlignment, etc...
>>
>>
>> Gracias.
>>
>>
>> Un Saludo,
>> Xevi
>>
>>
>
>
>
--
Alinear celda del Browse
Puede deberse a un bug en la propiedad Alignment de la Celda????
Pues si cambio alguna otra propiedad si funciona correctamente...
METHOD Browse2Column1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite ) CLASS TFrmKitsCitroen
oSender:nClrPane := If( Len( cText ) = 8, clRed, clWindow )
RETURN Nil
Cambiar la fuente, también funciona correctamente...
METHOD Browse2Column1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite ) CLASS TFrmKitsCitroen
If Len( cText ) = 8
oSender:oFont := TFont():Create( "MS Sans Serif", 8, 0, 400 )
Else
oSender:oFont := TFont():Create( "Arial", 8, 0, 800 )
EndIf
RETURN Nil
Un Saludo,
Xevi.
"Xevi" <xevicomas@terra.es> escribió en el mensaje news:4346c4dc$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Ignacio
El resultado es el esperado... unas filas/Columna a la derecha/izquierda...
METHOD Browse2Column1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite ) CLASS TFrmKitsCitroen
oSender:nAlignment := If( Len( cText ) = 8, taRIGHT, taLEFT )
RETURN Nil
PERO...
el Scroll Vertical entra en un Bucle, que no para de "destellar".
Le he añadido el LogDebug(),
METHOD Browse2Column1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite ) CLASS TFrmKitsCitroen
oSender:nAlignment := If( Len( cText ) = 8, taRIGHT, taLEFT )
LogDebug( cText )
RETURN Nil
y efectivamente, muestra repetidamente un mensaje en el DeBugger
Alguna sugerencia para, terminar este bucle???
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje news:4346bbf7$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Xevi,
>
> De forma sencilla se se pueden cambiar el propio texto, el color del mismo y
> el color de fondo. Mira el evento TBrwColumn:OnDrawCell.
>
> No lo he probado pero si cambias en dicho evento la propiedad
> oColumn:nAlignment es posible que puedas cambiar la alineación, pero ten en
> cuenta que entonces deberás de restaurarlo para las filas siguientes, y la
> única forma de hacerlo es estableciendo siempre la alineación en dicho
> evento.
>
> Saludos,
>
>
> "Xevi" <xevicomas@terra.es> escribió en el mensaje
> news:4346b680$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>> ¿Se puede alinear el text una celda distintamente del alineamiento de la
>> columna.???
>>
>> Lo que pretendo es alinear una columna dependiendo de un valor.
>>
>> ¿Cómo puedo acceder a una celda en concreto????
>> Sería posible...
>> ::oBrw:aCols[1]:aFilas[n]: y aquí la propiedad que desee modificar...
>> nClrPane, nAlignment, etc...
>>
>>
>> Gracias.
>>
>>
>> Un Saludo,
>> Xevi
>>
>>
>
>
>
--
Pues si cambio alguna otra propiedad si funciona correctamente...
METHOD Browse2Column1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite ) CLASS TFrmKitsCitroen
oSender:nClrPane := If( Len( cText ) = 8, clRed, clWindow )
RETURN Nil
Cambiar la fuente, también funciona correctamente...
METHOD Browse2Column1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite ) CLASS TFrmKitsCitroen
If Len( cText ) = 8
oSender:oFont := TFont():Create( "MS Sans Serif", 8, 0, 400 )
Else
oSender:oFont := TFont():Create( "Arial", 8, 0, 800 )
EndIf
RETURN Nil
Un Saludo,
Xevi.
"Xevi" <xevicomas@terra.es> escribió en el mensaje news:4346c4dc$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Ignacio
El resultado es el esperado... unas filas/Columna a la derecha/izquierda...
METHOD Browse2Column1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite ) CLASS TFrmKitsCitroen
oSender:nAlignment := If( Len( cText ) = 8, taRIGHT, taLEFT )
RETURN Nil
PERO...
el Scroll Vertical entra en un Bucle, que no para de "destellar".
Le he añadido el LogDebug(),
METHOD Browse2Column1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite ) CLASS TFrmKitsCitroen
oSender:nAlignment := If( Len( cText ) = 8, taRIGHT, taLEFT )
LogDebug( cText )
RETURN Nil
y efectivamente, muestra repetidamente un mensaje en el DeBugger
Alguna sugerencia para, terminar este bucle???
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje news:4346bbf7$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Xevi,
>
> De forma sencilla se se pueden cambiar el propio texto, el color del mismo y
> el color de fondo. Mira el evento TBrwColumn:OnDrawCell.
>
> No lo he probado pero si cambias en dicho evento la propiedad
> oColumn:nAlignment es posible que puedas cambiar la alineación, pero ten en
> cuenta que entonces deberás de restaurarlo para las filas siguientes, y la
> única forma de hacerlo es estableciendo siempre la alineación en dicho
> evento.
>
> Saludos,
>
>
> "Xevi" <xevicomas@terra.es> escribió en el mensaje
> news:4346b680$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>> ¿Se puede alinear el text una celda distintamente del alineamiento de la
>> columna.???
>>
>> Lo que pretendo es alinear una columna dependiendo de un valor.
>>
>> ¿Cómo puedo acceder a una celda en concreto????
>> Sería posible...
>> ::oBrw:aCols[1]:aFilas[n]: y aquí la propiedad que desee modificar...
>> nClrPane, nAlignment, etc...
>>
>>
>> Gracias.
>>
>>
>> Un Saludo,
>> Xevi
>>
>>
>
>
>
--
Alinear celda del Browse
This is a multi-part message in MIME format.
------=_NextPart_000_0030_01C5CBFA.214FD630
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_0031_01C5CBFA.214FD630"
------=_NextPart_001_0031_01C5CBFA.214FD630
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Xevi,
Puede deberse a un bug en la propiedad Alignment de la Celda????
No es exactamente un bug, pero es cierto que t=FA no tienes la culpa =
;-)
El problema es que al cambiar esa propiedad, se est=E1 forzando =
autom=E1ticamente un repintado del browse, lo que es l=F3gico en =
condiciones normales.
No obstante, aqu=ED tienes una peque=F1a correcci=F3n. Pero en vez de =
cambiar la propiedad usando:
oSender:nAlignment :=3D ...
deber=E1s usar:
oSender:SetAlignment( ..., .F. )
Por favor, pruebalo y dime si te funciona.
--=20
Un saludo,
Jos=E9 F. Gim=E9nez
------=_NextPart_001_0031_01C5CBFA.214FD630
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2900.2180" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>Xevi,</FONT></DIV>
<BLOCKQUOTE dir=3Dltr=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV><FONT face=3DArial size=3D2>Puede deberse a un bug en la =
propiedad Alignment=20
de la Celda????</FONT></DIV></BLOCKQUOTE>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>No es exactamente un bug, =
pero es cierto=20
que t=FA no tienes la culpaÂ
</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>El problema es que al cambiar =
esa=20
propiedad, se est=E1 forzando autom=E1ticamente un repintado del browse, =
lo que es=20
l=F3gico en condiciones normales.</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>No obstante, aqu=ED tienes =
una peque=F1a=20
correcci=F3n. Pero en vez de cambiar la propiedad usando:</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>ÂÂÂ =
oSender:nAlignment :=3D=20
....</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>deber=E1s usar:</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>ÂÂÂ =
oSender:SetAlignment(=20
...., .F. )</FONT></DIV>
<DIV dir=3Dltr>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV><FONT =
face=3DArial size=3D2>
<DIV dir=3Dltr>Por favor, pruebalo y dime si te funciona.</DIV>
<DIV dir=3Dltr>Â</DIV>
<DIV dir=3Dltr><BR>-- <BR>Un saludo,</DIV>
<DIV>Â</DIV>
<DIV dir=3Dltr>Jos=E9 F. Gim=E9nez</DIV>
<DIV dir=3Dltr></FONT>Â</DIV></BODY></HTML>
------=_NextPart_001_0031_01C5CBFA.214FD630--
------=_NextPart_000_0030_01C5CBFA.214FD630
Content-Type: application/x-zip-compressed;
name="BrwCol.zip"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
filename="BrwCol.zip"
UEsDBBQAAAAIACJaSDOEhiFTJR0AANdJAAAKAAAAQnJ3Q29sLm9iapRaDXRb 5Xn+7r2SLMnyb+zE
TmTi/EFCTLghCSSEP1mSbRFZEtaNYgeHG9lSbIsbydgK2JCGtE3UQNnKNjpo CwN2+Ckt5zBozyns
0JaunLYMtrIzWthZD9vOLAnO2ErPOCvdOMve7+9e3c9ymuUc577P+/+93/u9 97tOTnuRu3/urmDB
2DGJznUihNr6C3NGOp/pDW7f3rtnx54dO9G5NoQ+sPQ2Hh7ahc4pCH2I/nQv cupaeFRzBOOhMNCh
gBZw4L9cocGR+MGEQ+9PJhX4cemRWETT3fhvLEePNKDnIookI0It7Xc4KYVQ g5tQERfyeBH6ugu5
zivnZfTAa3KLPtSvDxyM6aOBYDSQTKJVnKHrwWhSTwRGAsOozcaMxJIaauas RDB+MKahdo7hESBW
Nb4Gw1pyLBmMR+MjyG9G7B85BKyDw+AjEInRNayuI+2Pj6Iukx+Mx7SReBT7 HACyjiTJJGZKWjA+
nIjHwsBr4rxAMhiIWTA8nNDGkI/DWCAWQo0cDQdGkVmoVCCqjSXC1uLgEUkm tZFIbNAqlDYSiCUH
4iPDlpdoOGbJR8KJaCQY0MKWPAbF6bC2Qx8Oxw72hwcjMSsU40a08LC1OsYM 2zIGq1YOBiLR6Eg4
WFOq4EgYQifj0Uiof+RgcsiKGwpHw1o43n8z1u+wLTEaH4SMo1Y2iXhSGw4n k4HBcM3CB0cioXAo
olkVC0SjUJ1hKyEtzsplNlHyYD+wkNc0wcGnJ/Q7jyfmCpPZ+fnk4vGJgjEP G0a44YXs5IliFqEH
1yEkmXlqoX6zbfxIlI7WSHdjKahInTW2A6Y4ukw8WivOYHE3iK0WM2Unl8ms Vn4IZE8MKxJCuYbp
9/YjNP03wJmGH5gG8OeLr7f++MEHc5Qz/bbPZPuAbfK1pvr88yvwzzbX5z/c Up+/prU+v3t9ff5P
V+A7e+vzgyvwIxvq8/9sBX7Pxvr8Eyvwv7MCv2Fzff7kCvyfr8D/5Zb6/OZL 6/MHVuA/swJf2Vqf
f8sKfOe2+vwPV+AvbF9hXVfU52+8sj7/P1fgv6LW57+5sz7/iqvq8w/V8tFj T0tLiiYvNWnyU+2p
zUvrgd4M9LbUlqVrgL4O6ADQcaA1oMeAngLaAPoOoO8F+gzQ9wH9MNCPAv0k 0C8A/V2gXwH6p0C/
BfTfAf1PQC8B/SHQvwX6M01+WkptKbdocrkD6G6gLwO6D+idQN8IdAjoCNCH gB4HOg10Aegi0ItA
fwnoB4D+I6AfB/opoJ8D+ntAvwr0j4D+OdDvAP0PQFeB/gjo3wB9XpMrDk1+ xpPaUlkDtB/oDUBf
CfRuoPcBPQh0FOhbgNaBzgA9A/RdQJ8E+vNAfwXoh4D+GtDPAv080C8C/UOg Xwf6DaDfBfpXQP8L
0L8G+hOgf5faUm3Q5KpPk59tAxrqX4X6Pwv1r0L9q1D/Z6H+6AmHA24mR2Dv 4FqC8HSGMYhygH+E
rD/5qyif/7lTwF8Q9O8T8IOC/tcF/KSg/6Igf5Xh3Sy/NwT9XzB5lMn/leEM w78R9P+XyU8yuWcX
fT7EcMcuu75fwH0CvlrANwg4LuBxwFB29DqLdwfDv2K4xPB1EsWPMnyG4Rd3 2evzfSb/hNn/gmEf
0/+YYYNhx26Kv8twF8Maw9sZfovhMMNLDOsMvypTfCfDm5n8gd329X6VyT9i +i8I8leY/HmW/5sM
P8D0/1HQLwv41wL+rYA/Y/76mL/mPfb6bdpD5UUm3yvIB5n8HSa/leFH2Xpn 99jjnRTwGQH/oYAf
Zv5CzP+3GX6K4b9iuIPhdxn+jMX/d4bHmVy52p5/h4C3XG2Pjx57TlpCMDbd mrTUCs9e+NmakpZU
eO5NyUs3wTMBP0fhZzqlLM3CcyHlWDoNzwfh55GUc+kJeH4T7P8Cnq/Bz8+A fhue78Hzn+H5Mfx8
qklliFOGOGWIU4Y4ZYhRBv9l8F8G/2XwXV4AOfgun4Mn+C8/Ak/wXwb/ZfBf fjnlKkOMMsQoQ4wy
xChDjPIH8IQ4ZYhTgTgViFOBOJUueEKsylZ4QrzKXnhCzMoQPCFuBeJWpoGG 2BWIW4G4FYhbgbgV
iFuBmBWIV4FYFYhTgTgViFP5NNVQhThViFOFONWulLsKcaoQpwpxqhCnCnGq EKMKMargvwr+q+C/
Cv6r4L8K/quwrirEqL4MT4hThXVVIVb1vZSnCvGqH6S8VYhX/TTVSEe2QxW2 8AYBxwQ8JrSALsiz
AjYEfELA9wq4JOCvCPhrAn5SwN8S8PcE/JqQ/08E/Kag/66A3xdwRcD/IeD/ FrD3GjvuFvAmAe8Q
8PUCHhLwiIAPCzgt4GkBzwp4QcBnBfxlAf+JgL9xjb2+jwvy5wT8koBfEfCP BfyWgH8p4CUh/keC
/BMBK3vtuFHAawW8WcBXCfhaAYcFHNtrz++wIM8K8oKA5wX9U3vpCHcoVO9+ Qf+hveLI3kZHNh/X
dFT7bKMaj2k+ovF45qMZj2VzJKea6EhONV9wJONxjEcxHsN4BOPxi0cvHrt4 FOJxi0ctHrN4xOLx
ao7WVIs5WvFYrTtSU614pJJxikcpHqN4hNYdn6k2Mj7J6Ey109GZWkVGJxmb MD7p2OzAY5OOTPc3
hBI+I+AXBPwDAf+1sCV/K8jfF/CHAv6dYO/aZ8ft+2gL+FkLrN9nt98q6O8S 5AEBDwv4NgEXBH/z
gvweAZ8R9P9AkD8kyJ8W8EuC/qsC/pmA3xbw+wL+NwH/l4Ad1woj4Vp7Pl2C fJOArxTwNQK+ScBh
AccFfKuAJwRsCHhewPcK+MsC/qqAHxfwcwJ+SajHDwT5G4L87wX5+wL+UMCf CPh/BOzZb8ddAt4m
4D0C7hfwsICT+8WRuXP5yMTjcijVuWxknkutZjfbNctvtqmu2hFKxicenV2p btv4HEqtNUfodGod
vdmm/Bc1St2pnhXH6e8bpbVjtCt1iTlK96bW1x2nfJTiMcpHKB6f5uj0HRZK mRbw7QIuCvhzAr5f
wA8L+M/321vvWwL+jqD/Q0H+EwG/AbgLnrsVipvk88W30ClZQlMSyrj9A6qE DDnjQ7km/Ntq8g9A
J47nkaFkck2jtRyfNCuPSEh1YMtZFFGdlHi4WzZcGY58UkIyGsDfYou/U3Vj pi4ZHmDMyvmGblmX
8g01Ocg4h+NWDqNiDo2akIEMhjI624PURmyeayyE0sX0wEzWyKBMRpc9Gfxn 1hspSThVmacq21KV
66UqXzBVBac6ZKbarIUmjtlzbR61sUi6CimYwrNQbFko9bJQLpiFA7LoeQdZ aYwuS2NZyRy0ZFtJ
yRxQsklSrlj6eBbloAtqiybjKCVFbSahFnU515CnxXVIyOOZdUVKjhqhlwqj 2bwldy6Xh7KTltyF
K+LgFXHYKuKoVxHHBSvixPvSbxakdvWkGqNCNZxkR5w8vtMW3ynGR49FUN3R WTs2F1K9bHRuMG+c
30xtJGPz5dQm/ksBOlJa8ZKcF1ySC2/y683WmkbFHQ4Wjs8W8tl8ka7JRXd4 P9lhF8r5jER6DqQD
BdBYIBs81k6uWGobRAbGrOwyjwm1cRWIdibn0ggBRjn3YJb6yLmTjMrk3Imw Tkls7mTmzelwZqYY
nZkvatmFInIg2ldjO2jYdggLUaWIugqoWZQJ+9vVDsQQlnQrGRecIXCeLM7N 5KewKxrCw0K0mCH6
CyfymWUxOuvFWH1xMRpZjMaBGaOYnQvfmTaWnY0mpuOeHMqmM9k5U8FY08xU mk2VgUKhWKvSxVVa
mIpnUisUjOLMrKXTzXVaTZ3EzGTxxNzyc9pmBSIJcwVjbXPOi/eKcpl2O/eX DxpzZH+MdZlxt09i
PnMeKAk0WGGOVmNVrX4inc8SfeeK+qt59fIBY2Yqfxw35iJdkx/WlGsopqPh AQ0tQv/n3MX0SGRw
SEPjMoaeYjoYjmnhETTuwngV1R0KB0LhES65CUvaayXMRS8TEEglJNJ4OxZ0 2ATcWT8LQ3Gt0Wpm
VCthgS7Fv3vyILzaNbzl8/3HZ5ctuOf3LNhBx0CHTHx1mZUDX8PpuamZPBr3 2ra6m6k05A/NZIrT
NI5xSbOxnrfLWn6E88nCnJlIL0lkYj4Wj4VpIr6J+UAS1hbC/9h9N+Y0TcyH wiZr/DzOTyGJrWM+
m/K02SPH01NZ7noDj+w3tWi/27Q2cq0epuXN4wOsLc6aKptojlkrR9dEdjCs 8ewwrfcf1LR4jLVL
M+VFI0kN/0eMcYX00ESWK+Ha5rwTWVPBidfkImu6hI9Hkge8tKagnOPnbdVe z1vfSM3Mz0wYWTY/
jc18NRvULVQjng/OZdPFLIyWnLuQzObxTJhVIqWNTKMtnh+cm8ngYCtobmKa zXFW5qAxM3k7VlvH
1PryA0Z6ar4vnyjMj5K/x4jlZsuSlv6iLbcwS188j69OF213KbNr4bmOXLTp ZZYpTfbiTbcy0yaa
7cUbbrM2gaYbmjAu2vhyy5gm/P8x3m6tFqe8gikdA111PfQxDw1x0qnYsptb ptLGiWyfMXwC3h1E
iA2uYAaNceykyI16BKNgOj+ZNbKZvvyB7CIx3GEZ9hfzZp7NNkOieaWlGZpL 3xXMGgbWvJxrTuL3
Sh9/wfTxN0efMTQzNR2dKVIvKvPihaORLeLyYCedghM6RrD+Tisq6NNsag0W RIOrrHMRnE7np7J0
aIKN36x9LHsX4fbl40aGyrHpbnL3vZpP5GUfFsalzfBRBG++GgEeCNdwiwvc q/fhS7GLOIIJwO8P
7gK/JngLfFLgAUwvytfW2DTkI5D7gnWL3s+E+JbtxJtuia5XL6Pdw4aOsbVZ l0+3Is+sI1K6gQmd
JJaxDUSEf6N6OTVKQoNMFtHYOvIdqW5Hah+5P6lXkMes5GIWAVKu/po8fPnQ zPyskV6Eq4GVToin
E8jkTsB9y9jBY4aZxJtIz+RpMxhXcuEAF4bn0vNZKlS5cJAJHf2FBWTs5Owh xvaYh8C4issi3J91
OzJ2ceHNXDhoCddy4QHuFYS0W+Dty2RRLkuasvVcNsxK6gsa2fQcczu2ntZ1 N1L3kIKSMeAnnyNX
AwMaxypxjG/KUDqfgVfRmIcYL3J5nMm9kXn+thprof6vIc654i1kr0ZYsi2k BNCq8Ykc3mtobKaX
ZBpNoGHdbOASR+WnZAcqpWrasoXMAnwGk8VFiG5u+iGm5MFtYdRMJVNjjFcu lD1GjY29PI3DTOYj
r0741piDhjL2cfGtXAxZmjcKuEsw8TjfTNw0bFOu5cIjTNiIhUNZmE2wvv1c eltNk7BDCpd7JtRr
O4ieW7jWM+FRJmwFoe1aCBdCppLmoUGFbxdcK5h0gknxlxa5xsEFjokmawz5 RwN8LDBppkZKPxLn
kXEdl2ZrOxsquXUbMq7nwmO2FVHhDVw4VdMttXdAuP0xjenafqq5/8HNj2rg L20X/9J22b60XfW+
9F11Posl+VhCOftt/NWu3oh0ZRY3thQpyepNgJbdRmalkH9TSVEDIBzrRAqc BgWp/Ug/r8tgLLvA
tlsuuTx4rCnkI3FLxAhm1BBinFl6hrAdfE+ed7t88qLbv6bUoIa5iq7gL2js x6sOEE6k5NMVnK10
LCGf/T5SB+GVwxPdgz8+caROSGwIMUykOBU1gnQ6BnqBbTp5A6k31zg5IDg5 IDiJEox/j0AK9i7A
jNvfsJCQQSyrwzhp4sqhxljKLiOeMRKZIx+DG5/cmXD4JL+31KBLCUf3npJX d4y3uoHReAq+tLs3
wwod472Y0XQKcu1eVWoGxk2Y0XIKbtgQZpUu95xEpU68QoUlu1q9BTGsO2iy 3Th5Ll+L5Qds8h4P
JKaOWBvig01tiahJi+NfBbd5zcJgBoab1IMEmzVEkpqyaljjVl7mVmZuFeZW Zm6htId4aalTn6RL
6ijhuf0tJU7jjoXijpnxXBcRbyO01eGaeCW3GL7RdM/C90jqrSs11/jy5qrp mwYst/eNN2P6vUJS
j6zk97blfnWz34j1figK7jdPQsL9hld+lGj4pM71Tl0a6NkglRynFIRI26lp Jgz5M5CXGWw3FGAC
qZM4nlkGuHxQdRtTPu1FCaV7E5xBsMhQBabHlJiKXGrGIbM8ZM88KrVYhdlf ajWOZXSFBT5gC0yN
bEzs1SeD38tL7aYhi59dFp9oyqXVVHOK5iCfdkFi8PWPb6bQsaSmfqgYGQOb 7Rt+hJV2gZbW47HK
1RZRZ/jWzOIx6ozokn8t7BjcJWQ1Z8n4tt1u9z0jEU1+QC7geWdJgSLCoJDg kDjY/YV16SpwbIgt
4rViKSTWSYm1BKxcxuWQxr1QHWgLPJrCEMGpHgeFoxI+xHLCgU9QPqPDWMrJ UeTEi3P4PaWGDD5q
5GhMm7k31TZss1oQs2mrPQjtWG4/CJ0XdVhX2w/rGvGwrqUraS+tIyuB94dC 3xOXWOfsCUmdXemc
3bHsnFl2z0vq3ErvgzuWvQ+wnYKOJaSzfymp8/iXvkcVaEhsWSTdCrfDnNzP b/dQbhheeIMVvPDe
khNvkKyeQOqdpg6uikzeJ24dXtBNbuL/TemUE061dC9cMVFJPuWGv7En9S5i Bf2yBbwtZEgWR2V0
1A3R+MvGpTuww+4bSh510S6Hpa0ueY27oQG4Kxy8o+TDPLmGB+f3HuDAdaKh 1K43LLb0/DEqrVJP
Wonf3eI/XOo45YJLcKfu0hs2+iNwIj8HRkdd5ISW1hinMrge2BOUgPC6cA2c 7HTjXyErZrXowXZ2
v9S9pbROVJOXqcml9bi2blzbDaVe9V6hrOppQg49i1U3sdvAVqe595/Yp6v6 ebMRHDrMV5/6BdoN
7gF/M5yiGEG4D9zqFylNJz3tCJcMb338qoSQ4y1kqZJxJpPG/3R4BPUeQW6f gttBV+Di0wqbdwYK
tUiqvxN2TBmX3f62UgNhj8uE3w0toYy7sLqH8O9mneITtqGt1ETtWolCW6mF wt5xBwnarp7lv8Yv
dZAuc5L7zCZZLdW87qEGX7JgCKaCQqYCvFzusd3lSFO4jXOZzEIGAjhKHtwF tAdmYEbVqOouKeGE
9O4jbycn3LHvz9jlPjmD3f9fI9f6I7dVxe94PLv27G6y2Wy2GbJplUDVtA3U oCAqqADH49kx9doj
z2yWlRZdPlhFqkYoQiBtVooUPsRVUiiFljctKZQ+eJRXeFPeb/gnkPjAH4FY fufca/t6Nh/4NPee
c+/1ed9z7bnnSXP5/ZDk/2aesB8O6OCFluu6q05x5Cqe1XsWPH4iXxWIQZ+s MkibmWxHxXHSy3zn
sdHc9UesXbvdEiOn6EhbqdtGFtxB0yEfA3vz3lOgAyF0oXDlAlxlH4EWVuyI XQsBUS7AtAg/JEgb
4qfthTs2dkHvU/z8OaJ85GIPfNrod4tjsotAvwIfcnbbrWNqCYqNsrvbWQZi bQbRcwnzxvX5SHag
22XEP2ef8fsW53HS7hPS5WXvxmxbzbYJfYbRDtBq9bMz+Hunn875gd5najIX Lc3Zfd4zDNJfJhzE
rHPTZ7GpSIfC+GfrKZfFart3rnhg+rlcz4FRLBYP6tFycbVdnJ9+PkejVTxE 6nDY5D5qqRTa1Sn0
F1hzV5wT93S9L3J7QHbnkt1ptT4BBX1J5DfEtYMD78vU8L2v0M9wNAdffIoH wSBdUhOa1/57AG13
1VDquNjUnqYOiVWFgfPLxeLV+YODYumq0yIbOKpGXKHMe1nDVqBaPatbHL/q MvCEAvLANQ076T0n
8r0bLfqu8LzIyXBBB/o3kX9cUfTZUBXZ37HiHgra7Q/aOn04631Vden4A195 kzu9hdCHSD4HCyAv
vFdJ47iWxv3eC2Wmf6F4wPsaHvhC+cDiQe/rwnuRKCQPXinOe9+o+iqff8j1 XqL++lk+or1MbX04
s+lE16LD2YkRWe1bCs97ReSPt3jpt3qvVu23Edz7Js2V3RYgvdPFBcLTDqJJ eTuNkTY13+F9C6hv
V6iHve8ANY+I4Uh370aH3uW9pkX4Tu+7tGxUvEta/fWl4hHve9wH6e9GwKYN 7D3T71NaAegHLARx
WKJ1swj2KLJzLH7dqr9WukVLBTG7zkVaOhc5fbLl/QBd+ij8QzohQyVkbbd5 yD4dRBzvRyK/Arre
8HEBC1MYitVHYGFA7RPvj8HANKZNkxYJs2sR6lEkURplO+snES70JFjcjxXH vfuK5XJMx1nvIaSV
02GC5SCrWPV+AqGRsGGEq5DnT3kO9de8NfR/VvXvwvkvb+5HBD6J836uBYCF LLJXiN1lSz3l/ZwR
M5nVPy3vF0aGdFxnSKdfEbr9BPbG29xigc2ZApvXGCUwxxCYW2JYYF1TYAsl igW2WAlsyRDYkXIM
C+xoLbDlWmA3ixX219tVds4R6D8WBRoVBjzYo2EhZj4w5/0S5rqnv3yz47ml sEDv65S4/IrtX+85
C8rNYHIBiK69cP1csYTzwwpo/rXhissg9TemayK5+q3Ic016z/tdua3le5Ri nmJ6XNLC6bw6IZ5p
UzLfomQ+QDK/iZzDOAdi87C835fa45P0i3VuDUpPQXd/ECaQRtLZqucg+UAL 218b2n5GgKc/lucq
qOJPaO/cza9Fp3/Op3/JIQwKQ9q1Flv0Tggs/5XGrarXp8YIxh79v94dLM+e B1b2WFsnFD1sl3e5
lIdZ19/bnv6N9h/Kn2ych/6eP95e6iIxoIQR+u0gqJ1B7oVB9r7sYENB+tJG +tW5ZtH28rLVWwPf
NmAuJa3g4xpyB6t8EWVdz9q0PAnG2ukJod6EvYa4STnKAWLu5dbch+c/9g8x J+bNq8oiCbdFeQHf
vHev7mmLoYHhy/f6zn2QopNtBZM0C/w4FsbVe/Ous/D7/VGWjsJssiMa15xF 41YzjdvciicR38Sf
GKPqZnm3Xg58uuRNH32pWIFIq2vf0qfr6WNzxEVQ2y8RqmNc78eS6sP/DHCQ ppNDwEmagsCRCaVC
AFFMQ80yA81pfhxtJJtUAKAJv7g5uiMKK21HKgxc6E+GM7O2o8OwcZpN7shV tEn34+/E2p0wJDIu
L9AEX4rG0cU4JA2Flw6zMYjCuK8v7ZMS8ey0IWNtSAaEdYWxURJHSQi9xpgM nEhhQfSEZJSOzQl+
/31b48aD66oN5rqZPw5ngfS/AHNiOmZGD3HBWgzi0M90O9WWIQeBhsSlKIy5 /XAwnuzEh/jTBSEa
Q0HZIfURcBjyP0aaFKkWxDBbdOJQrQmjxAQrCP4Kswph9Wmi/9YSxFHwqDBW VSUofHTHpAkWfqI1
BYZL1gN2sLoPUSjPSPVvBZCDpLbmSiiqtAVXtJAGfggAsHEW9jN/W2ThIAvH Q2EugfUaDjLbrXQh
6yYk1I/Go9jfYb5Abemysm4NEnYXqX4G5Y9STMkoViLOFTBlKZfiLxmmwhy1 RmW5QhIl/fD9og4M
lfXUVgZJQwIboZpRFvWQSbVU5b3i1r/blnh4g7DKZYE1PThNiGkyeU2ytqVE /6Y8jAKhCEZRMNnK
QmEWDeH5oGArFHXZEKoWktCi5J5jgVUzP5iwr9a1Q0p+oZZNP6NSIRtldEpI q0SMNgLDHajQiJzB
wxIDhAByyhhbSUpOMIz4T0qNUiRmBZKNMGFEnMKufa11YZQjGQ/T7VE62hoR ABRVdiGSLN3uR5ew
ZWTq+QmgDQBVMMGuxyEpCeJs5IPzqpJJqsqWHKpj0ihfklTBNE6TKubQoxHt yEggjW2tI6Vt3ZEs
iE2qvyMTIkJJj9yTl2iUQ0lJSRyA4et1O9ZjGQSzE0q2ILifJvGOMDdDqZQv K+sot9AEBg5D2CB9
8maq2rRx0USMqPxOBXDKAjgkBVtjYdZnkfUGXVdoGdQSkknNck2kDGBVqWhu 9TPbOqxXr1eFLmNZ
U/JGUzGsjE5sjfo8rxIVmSZbuixjQcpCvbiT+Jv0gIbMK+8r68xU5WWk4Vm6 wow/Eee4btJ44k+i
YHy/0DWYLn/kQ8jYbnXpT658m1+I5zriX9akJZ6kP7v+D1BLAQIWCxQAAAAI ACJaSDOEhiFTJR0A
ANdJAAAKAAAAAAAAAAAAIACAgQAAAABCcndDb2wub2JqUEsFBgAAAAABAAEA OAAAAE0dAAAAAA==
------=_NextPart_000_0030_01C5CBFA.214FD630--
Attached files BrwCol.zip (7.4 KB)Â
------=_NextPart_000_0030_01C5CBFA.214FD630
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_0031_01C5CBFA.214FD630"
------=_NextPart_001_0031_01C5CBFA.214FD630
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Xevi,
Puede deberse a un bug en la propiedad Alignment de la Celda????
No es exactamente un bug, pero es cierto que t=FA no tienes la culpa =
;-)
El problema es que al cambiar esa propiedad, se est=E1 forzando =
autom=E1ticamente un repintado del browse, lo que es l=F3gico en =
condiciones normales.
No obstante, aqu=ED tienes una peque=F1a correcci=F3n. Pero en vez de =
cambiar la propiedad usando:
oSender:nAlignment :=3D ...
deber=E1s usar:
oSender:SetAlignment( ..., .F. )
Por favor, pruebalo y dime si te funciona.
--=20
Un saludo,
Jos=E9 F. Gim=E9nez
------=_NextPart_001_0031_01C5CBFA.214FD630
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2900.2180" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>Xevi,</FONT></DIV>
<BLOCKQUOTE dir=3Dltr=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV><FONT face=3DArial size=3D2>Puede deberse a un bug en la =
propiedad Alignment=20
de la Celda????</FONT></DIV></BLOCKQUOTE>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>No es exactamente un bug, =
pero es cierto=20
que t=FA no tienes la culpaÂ
</FONT></DIV><DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>El problema es que al cambiar =
esa=20
propiedad, se est=E1 forzando autom=E1ticamente un repintado del browse, =
lo que es=20
l=F3gico en condiciones normales.</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>No obstante, aqu=ED tienes =
una peque=F1a=20
correcci=F3n. Pero en vez de cambiar la propiedad usando:</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>ÂÂÂ =
oSender:nAlignment :=3D=20
....</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>deber=E1s usar:</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>ÂÂÂ =
oSender:SetAlignment(=20
...., .F. )</FONT></DIV>
<DIV dir=3Dltr>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV><FONT =
face=3DArial size=3D2>
<DIV dir=3Dltr>Por favor, pruebalo y dime si te funciona.</DIV>
<DIV dir=3Dltr>Â</DIV>
<DIV dir=3Dltr><BR>-- <BR>Un saludo,</DIV>
<DIV>Â</DIV>
<DIV dir=3Dltr>Jos=E9 F. Gim=E9nez</DIV>
<DIV dir=3Dltr></FONT>Â</DIV></BODY></HTML>
------=_NextPart_001_0031_01C5CBFA.214FD630--
------=_NextPart_000_0030_01C5CBFA.214FD630
Content-Type: application/x-zip-compressed;
name="BrwCol.zip"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
filename="BrwCol.zip"
UEsDBBQAAAAIACJaSDOEhiFTJR0AANdJAAAKAAAAQnJ3Q29sLm9iapRaDXRb 5Xn+7r2SLMnyb+zE
TmTi/EFCTLghCSSEP1mSbRFZEtaNYgeHG9lSbIsbydgK2JCGtE3UQNnKNjpo CwN2+Ckt5zBozyns
0JaunLYMtrIzWthZD9vOLAnO2ErPOCvdOMve7+9e3c9ymuUc577P+/+93/u9 97tOTnuRu3/urmDB
2DGJznUihNr6C3NGOp/pDW7f3rtnx54dO9G5NoQ+sPQ2Hh7ahc4pCH2I/nQv cupaeFRzBOOhMNCh
gBZw4L9cocGR+MGEQ+9PJhX4cemRWETT3fhvLEePNKDnIookI0It7Xc4KYVQ g5tQERfyeBH6ugu5
zivnZfTAa3KLPtSvDxyM6aOBYDSQTKJVnKHrwWhSTwRGAsOozcaMxJIaauas RDB+MKahdo7hESBW
Nb4Gw1pyLBmMR+MjyG9G7B85BKyDw+AjEInRNayuI+2Pj6Iukx+Mx7SReBT7 HACyjiTJJGZKWjA+
nIjHwsBr4rxAMhiIWTA8nNDGkI/DWCAWQo0cDQdGkVmoVCCqjSXC1uLgEUkm tZFIbNAqlDYSiCUH
4iPDlpdoOGbJR8KJaCQY0MKWPAbF6bC2Qx8Oxw72hwcjMSsU40a08LC1OsYM 2zIGq1YOBiLR6Eg4
WFOq4EgYQifj0Uiof+RgcsiKGwpHw1o43n8z1u+wLTEaH4SMo1Y2iXhSGw4n k4HBcM3CB0cioXAo
olkVC0SjUJ1hKyEtzsplNlHyYD+wkNc0wcGnJ/Q7jyfmCpPZ+fnk4vGJgjEP G0a44YXs5IliFqEH
1yEkmXlqoX6zbfxIlI7WSHdjKahInTW2A6Y4ukw8WivOYHE3iK0WM2Unl8ms Vn4IZE8MKxJCuYbp
9/YjNP03wJmGH5gG8OeLr7f++MEHc5Qz/bbPZPuAbfK1pvr88yvwzzbX5z/c Up+/prU+v3t9ff5P
V+A7e+vzgyvwIxvq8/9sBX7Pxvr8Eyvwv7MCv2Fzff7kCvyfr8D/5Zb6/OZL 6/MHVuA/swJf2Vqf
f8sKfOe2+vwPV+AvbF9hXVfU52+8sj7/P1fgv6LW57+5sz7/iqvq8w/V8tFj T0tLiiYvNWnyU+2p
zUvrgd4M9LbUlqVrgL4O6ADQcaA1oMeAngLaAPoOoO8F+gzQ9wH9MNCPAv0k 0C8A/V2gXwH6p0C/
BfTfAf1PQC8B/SHQvwX6M01+WkptKbdocrkD6G6gLwO6D+idQN8IdAjoCNCH gB4HOg10Aegi0ItA
fwnoB4D+I6AfB/opoJ8D+ntAvwr0j4D+OdDvAP0PQFeB/gjo3wB9XpMrDk1+ xpPaUlkDtB/oDUBf
CfRuoPcBPQh0FOhbgNaBzgA9A/RdQJ8E+vNAfwXoh4D+GtDPAv080C8C/UOg Xwf6DaDfBfpXQP8L
0L8G+hOgf5faUm3Q5KpPk59tAxrqX4X6Pwv1r0L9q1D/Z6H+6AmHA24mR2Dv 4FqC8HSGMYhygH+E
rD/5qyif/7lTwF8Q9O8T8IOC/tcF/KSg/6Igf5Xh3Sy/NwT9XzB5lMn/leEM w78R9P+XyU8yuWcX
fT7EcMcuu75fwH0CvlrANwg4LuBxwFB29DqLdwfDv2K4xPB1EsWPMnyG4Rd3 2evzfSb/hNn/gmEf
0/+YYYNhx26Kv8twF8Maw9sZfovhMMNLDOsMvypTfCfDm5n8gd329X6VyT9i +i8I8leY/HmW/5sM
P8D0/1HQLwv41wL+rYA/Y/76mL/mPfb6bdpD5UUm3yvIB5n8HSa/leFH2Xpn 99jjnRTwGQH/oYAf
Zv5CzP+3GX6K4b9iuIPhdxn+jMX/d4bHmVy52p5/h4C3XG2Pjx57TlpCMDbd mrTUCs9e+NmakpZU
eO5NyUs3wTMBP0fhZzqlLM3CcyHlWDoNzwfh55GUc+kJeH4T7P8Cnq/Bz8+A fhue78Hzn+H5Mfx8
qklliFOGOGWIU4Y4ZYhRBv9l8F8G/2XwXV4AOfgun4Mn+C8/Ak/wXwb/ZfBf fjnlKkOMMsQoQ4wy
xChDjPIH8IQ4ZYhTgTgViFOBOJUueEKsylZ4QrzKXnhCzMoQPCFuBeJWpoGG 2BWIW4G4FYhbgbgV
iFuBmBWIV4FYFYhTgTgViFP5NNVQhThViFOFONWulLsKcaoQpwpxqhCnCnGq EKMKMargvwr+q+C/
Cv6r4L8K/quwrirEqL4MT4hThXVVIVb1vZSnCvGqH6S8VYhX/TTVSEe2QxW2 8AYBxwQ8JrSALsiz
AjYEfELA9wq4JOCvCPhrAn5SwN8S8PcE/JqQ/08E/Kag/66A3xdwRcD/IeD/ FrD3GjvuFvAmAe8Q
8PUCHhLwiIAPCzgt4GkBzwp4QcBnBfxlAf+JgL9xjb2+jwvy5wT8koBfEfCP BfyWgH8p4CUh/keC
/BMBK3vtuFHAawW8WcBXCfhaAYcFHNtrz++wIM8K8oKA5wX9U3vpCHcoVO9+ Qf+hveLI3kZHNh/X
dFT7bKMaj2k+ovF45qMZj2VzJKea6EhONV9wJONxjEcxHsN4BOPxi0cvHrt4 FOJxi0ctHrN4xOLx
ao7WVIs5WvFYrTtSU614pJJxikcpHqN4hNYdn6k2Mj7J6Ey109GZWkVGJxmb MD7p2OzAY5OOTPc3
hBI+I+AXBPwDAf+1sCV/K8jfF/CHAv6dYO/aZ8ft+2gL+FkLrN9nt98q6O8S 5AEBDwv4NgEXBH/z
gvweAZ8R9P9AkD8kyJ8W8EuC/qsC/pmA3xbw+wL+NwH/l4Ad1woj4Vp7Pl2C fJOArxTwNQK+ScBh
AccFfKuAJwRsCHhewPcK+MsC/qqAHxfwcwJ+SajHDwT5G4L87wX5+wL+UMCf CPh/BOzZb8ddAt4m
4D0C7hfwsICT+8WRuXP5yMTjcijVuWxknkutZjfbNctvtqmu2hFKxicenV2p btv4HEqtNUfodGod
vdmm/Bc1St2pnhXH6e8bpbVjtCt1iTlK96bW1x2nfJTiMcpHKB6f5uj0HRZK mRbw7QIuCvhzAr5f
wA8L+M/321vvWwL+jqD/Q0H+EwG/AbgLnrsVipvk88W30ClZQlMSyrj9A6qE DDnjQ7km/Ntq8g9A
J47nkaFkck2jtRyfNCuPSEh1YMtZFFGdlHi4WzZcGY58UkIyGsDfYou/U3Vj pi4ZHmDMyvmGblmX
8g01Ocg4h+NWDqNiDo2akIEMhjI624PURmyeayyE0sX0wEzWyKBMRpc9Gfxn 1hspSThVmacq21KV
66UqXzBVBac6ZKbarIUmjtlzbR61sUi6CimYwrNQbFko9bJQLpiFA7LoeQdZ aYwuS2NZyRy0ZFtJ
yRxQsklSrlj6eBbloAtqiybjKCVFbSahFnU515CnxXVIyOOZdUVKjhqhlwqj 2bwldy6Xh7KTltyF
K+LgFXHYKuKoVxHHBSvixPvSbxakdvWkGqNCNZxkR5w8vtMW3ynGR49FUN3R WTs2F1K9bHRuMG+c
30xtJGPz5dQm/ksBOlJa8ZKcF1ySC2/y683WmkbFHQ4Wjs8W8tl8ka7JRXd4 P9lhF8r5jER6DqQD
BdBYIBs81k6uWGobRAbGrOwyjwm1cRWIdibn0ggBRjn3YJb6yLmTjMrk3Imw Tkls7mTmzelwZqYY
nZkvatmFInIg2ldjO2jYdggLUaWIugqoWZQJ+9vVDsQQlnQrGRecIXCeLM7N 5KewKxrCw0K0mCH6
CyfymWUxOuvFWH1xMRpZjMaBGaOYnQvfmTaWnY0mpuOeHMqmM9k5U8FY08xU mk2VgUKhWKvSxVVa
mIpnUisUjOLMrKXTzXVaTZ3EzGTxxNzyc9pmBSIJcwVjbXPOi/eKcpl2O/eX DxpzZH+MdZlxt09i
PnMeKAk0WGGOVmNVrX4inc8SfeeK+qt59fIBY2Yqfxw35iJdkx/WlGsopqPh AQ0tQv/n3MX0SGRw
SEPjMoaeYjoYjmnhETTuwngV1R0KB0LhES65CUvaayXMRS8TEEglJNJ4OxZ0 2ATcWT8LQ3Gt0Wpm
VCthgS7Fv3vyILzaNbzl8/3HZ5ctuOf3LNhBx0CHTHx1mZUDX8PpuamZPBr3 2ra6m6k05A/NZIrT
NI5xSbOxnrfLWn6E88nCnJlIL0lkYj4Wj4VpIr6J+UAS1hbC/9h9N+Y0TcyH wiZr/DzOTyGJrWM+
m/K02SPH01NZ7noDj+w3tWi/27Q2cq0epuXN4wOsLc6aKptojlkrR9dEdjCs 8ewwrfcf1LR4jLVL
M+VFI0kN/0eMcYX00ESWK+Ha5rwTWVPBidfkImu6hI9Hkge8tKagnOPnbdVe z1vfSM3Mz0wYWTY/
jc18NRvULVQjng/OZdPFLIyWnLuQzObxTJhVIqWNTKMtnh+cm8ngYCtobmKa zXFW5qAxM3k7VlvH
1PryA0Z6ar4vnyjMj5K/x4jlZsuSlv6iLbcwS188j69OF213KbNr4bmOXLTp ZZYpTfbiTbcy0yaa
7cUbbrM2gaYbmjAu2vhyy5gm/P8x3m6tFqe8gikdA111PfQxDw1x0qnYsptb ptLGiWyfMXwC3h1E
iA2uYAaNceykyI16BKNgOj+ZNbKZvvyB7CIx3GEZ9hfzZp7NNkOieaWlGZpL 3xXMGgbWvJxrTuL3
Sh9/wfTxN0efMTQzNR2dKVIvKvPihaORLeLyYCedghM6RrD+Tisq6NNsag0W RIOrrHMRnE7np7J0
aIKN36x9LHsX4fbl40aGyrHpbnL3vZpP5GUfFsalzfBRBG++GgEeCNdwiwvc q/fhS7GLOIIJwO8P
7gK/JngLfFLgAUwvytfW2DTkI5D7gnWL3s+E+JbtxJtuia5XL6Pdw4aOsbVZ l0+3Is+sI1K6gQmd
JJaxDUSEf6N6OTVKQoNMFtHYOvIdqW5Hah+5P6lXkMes5GIWAVKu/po8fPnQ zPyskV6Eq4GVToin
E8jkTsB9y9jBY4aZxJtIz+RpMxhXcuEAF4bn0vNZKlS5cJAJHf2FBWTs5Owh xvaYh8C4issi3J91
OzJ2ceHNXDhoCddy4QHuFYS0W+Dty2RRLkuasvVcNsxK6gsa2fQcczu2ntZ1 N1L3kIKSMeAnnyNX
AwMaxypxjG/KUDqfgVfRmIcYL3J5nMm9kXn+thprof6vIc654i1kr0ZYsi2k BNCq8Ykc3mtobKaX
ZBpNoGHdbOASR+WnZAcqpWrasoXMAnwGk8VFiG5u+iGm5MFtYdRMJVNjjFcu lD1GjY29PI3DTOYj
r0741piDhjL2cfGtXAxZmjcKuEsw8TjfTNw0bFOu5cIjTNiIhUNZmE2wvv1c eltNk7BDCpd7JtRr
O4ieW7jWM+FRJmwFoe1aCBdCppLmoUGFbxdcK5h0gknxlxa5xsEFjokmawz5 RwN8LDBppkZKPxLn
kXEdl2ZrOxsquXUbMq7nwmO2FVHhDVw4VdMttXdAuP0xjenafqq5/8HNj2rg L20X/9J22b60XfW+
9F11Posl+VhCOftt/NWu3oh0ZRY3thQpyepNgJbdRmalkH9TSVEDIBzrRAqc BgWp/Ug/r8tgLLvA
tlsuuTx4rCnkI3FLxAhm1BBinFl6hrAdfE+ed7t88qLbv6bUoIa5iq7gL2js x6sOEE6k5NMVnK10
LCGf/T5SB+GVwxPdgz8+caROSGwIMUykOBU1gnQ6BnqBbTp5A6k31zg5IDg5 IDiJEox/j0AK9i7A
jNvfsJCQQSyrwzhp4sqhxljKLiOeMRKZIx+DG5/cmXD4JL+31KBLCUf3npJX d4y3uoHReAq+tLs3
wwod472Y0XQKcu1eVWoGxk2Y0XIKbtgQZpUu95xEpU68QoUlu1q9BTGsO2iy 3Th5Ll+L5Qds8h4P
JKaOWBvig01tiahJi+NfBbd5zcJgBoab1IMEmzVEkpqyaljjVl7mVmZuFeZW Zm6htId4aalTn6RL
6ijhuf0tJU7jjoXijpnxXBcRbyO01eGaeCW3GL7RdM/C90jqrSs11/jy5qrp mwYst/eNN2P6vUJS
j6zk97blfnWz34j1figK7jdPQsL9hld+lGj4pM71Tl0a6NkglRynFIRI26lp Jgz5M5CXGWw3FGAC
qZM4nlkGuHxQdRtTPu1FCaV7E5xBsMhQBabHlJiKXGrGIbM8ZM88KrVYhdlf ajWOZXSFBT5gC0yN
bEzs1SeD38tL7aYhi59dFp9oyqXVVHOK5iCfdkFi8PWPb6bQsaSmfqgYGQOb 7Rt+hJV2gZbW47HK
1RZRZ/jWzOIx6ozokn8t7BjcJWQ1Z8n4tt1u9z0jEU1+QC7geWdJgSLCoJDg kDjY/YV16SpwbIgt
4rViKSTWSYm1BKxcxuWQxr1QHWgLPJrCEMGpHgeFoxI+xHLCgU9QPqPDWMrJ UeTEi3P4PaWGDD5q
5GhMm7k31TZss1oQs2mrPQjtWG4/CJ0XdVhX2w/rGvGwrqUraS+tIyuB94dC 3xOXWOfsCUmdXemc
3bHsnFl2z0vq3ErvgzuWvQ+wnYKOJaSzfymp8/iXvkcVaEhsWSTdCrfDnNzP b/dQbhheeIMVvPDe
khNvkKyeQOqdpg6uikzeJ24dXtBNbuL/TemUE061dC9cMVFJPuWGv7En9S5i Bf2yBbwtZEgWR2V0
1A3R+MvGpTuww+4bSh510S6Hpa0ueY27oQG4Kxy8o+TDPLmGB+f3HuDAdaKh 1K43LLb0/DEqrVJP
Wonf3eI/XOo45YJLcKfu0hs2+iNwIj8HRkdd5ISW1hinMrge2BOUgPC6cA2c 7HTjXyErZrXowXZ2
v9S9pbROVJOXqcml9bi2blzbDaVe9V6hrOppQg49i1U3sdvAVqe595/Yp6v6 ebMRHDrMV5/6BdoN
7gF/M5yiGEG4D9zqFylNJz3tCJcMb338qoSQ4y1kqZJxJpPG/3R4BPUeQW6f gttBV+Di0wqbdwYK
tUiqvxN2TBmX3f62UgNhj8uE3w0toYy7sLqH8O9mneITtqGt1ETtWolCW6mF wt5xBwnarp7lv8Yv
dZAuc5L7zCZZLdW87qEGX7JgCKaCQqYCvFzusd3lSFO4jXOZzEIGAjhKHtwF tAdmYEbVqOouKeGE
9O4jbycn3LHvz9jlPjmD3f9fI9f6I7dVxe94PLv27G6y2Wy2GbJplUDVtA3U oCAqqADH49kx9doj
z2yWlRZdPlhFqkYoQiBtVooUPsRVUiiFljctKZQ+eJRXeFPeb/gnkPjAH4FY fufca/t6Nh/4NPee
c+/1ed9z7bnnSXP5/ZDk/2aesB8O6OCFluu6q05x5Cqe1XsWPH4iXxWIQZ+s MkibmWxHxXHSy3zn
sdHc9UesXbvdEiOn6EhbqdtGFtxB0yEfA3vz3lOgAyF0oXDlAlxlH4EWVuyI XQsBUS7AtAg/JEgb
4qfthTs2dkHvU/z8OaJ85GIPfNrod4tjsotAvwIfcnbbrWNqCYqNsrvbWQZi bQbRcwnzxvX5SHag
22XEP2ef8fsW53HS7hPS5WXvxmxbzbYJfYbRDtBq9bMz+Hunn875gd5najIX Lc3Zfd4zDNJfJhzE
rHPTZ7GpSIfC+GfrKZfFart3rnhg+rlcz4FRLBYP6tFycbVdnJ9+PkejVTxE 6nDY5D5qqRTa1Sn0
F1hzV5wT93S9L3J7QHbnkt1ptT4BBX1J5DfEtYMD78vU8L2v0M9wNAdffIoH wSBdUhOa1/57AG13
1VDquNjUnqYOiVWFgfPLxeLV+YODYumq0yIbOKpGXKHMe1nDVqBaPatbHL/q MvCEAvLANQ076T0n
8r0bLfqu8LzIyXBBB/o3kX9cUfTZUBXZ37HiHgra7Q/aOn04631Vden4A195 kzu9hdCHSD4HCyAv
vFdJ47iWxv3eC2Wmf6F4wPsaHvhC+cDiQe/rwnuRKCQPXinOe9+o+iqff8j1 XqL++lk+or1MbX04
s+lE16LD2YkRWe1bCs97ReSPt3jpt3qvVu23Edz7Js2V3RYgvdPFBcLTDqJJ eTuNkTY13+F9C6hv
V6iHve8ANY+I4Uh370aH3uW9pkX4Tu+7tGxUvEta/fWl4hHve9wH6e9GwKYN 7D3T71NaAegHLARx
WKJ1swj2KLJzLH7dqr9WukVLBTG7zkVaOhc5fbLl/QBd+ij8QzohQyVkbbd5 yD4dRBzvRyK/Arre
8HEBC1MYitVHYGFA7RPvj8HANKZNkxYJs2sR6lEkURplO+snES70JFjcjxXH vfuK5XJMx1nvIaSV
02GC5SCrWPV+AqGRsGGEq5DnT3kO9de8NfR/VvXvwvkvb+5HBD6J836uBYCF LLJXiN1lSz3l/ZwR
M5nVPy3vF0aGdFxnSKdfEbr9BPbG29xigc2ZApvXGCUwxxCYW2JYYF1TYAsl igW2WAlsyRDYkXIM
C+xoLbDlWmA3ixX219tVds4R6D8WBRoVBjzYo2EhZj4w5/0S5rqnv3yz47ml sEDv65S4/IrtX+85
C8rNYHIBiK69cP1csYTzwwpo/rXhissg9TemayK5+q3Ic016z/tdua3le5Ri nmJ6XNLC6bw6IZ5p
UzLfomQ+QDK/iZzDOAdi87C835fa45P0i3VuDUpPQXd/ECaQRtLZqucg+UAL 218b2n5GgKc/lucq
qOJPaO/cza9Fp3/Op3/JIQwKQ9q1Flv0Tggs/5XGrarXp8YIxh79v94dLM+e B1b2WFsnFD1sl3e5
lIdZ19/bnv6N9h/Kn2ych/6eP95e6iIxoIQR+u0gqJ1B7oVB9r7sYENB+tJG +tW5ZtH28rLVWwPf
NmAuJa3g4xpyB6t8EWVdz9q0PAnG2ukJod6EvYa4STnKAWLu5dbch+c/9g8x J+bNq8oiCbdFeQHf
vHev7mmLoYHhy/f6zn2QopNtBZM0C/w4FsbVe/Ous/D7/VGWjsJssiMa15xF 41YzjdvciicR38Sf
GKPqZnm3Xg58uuRNH32pWIFIq2vf0qfr6WNzxEVQ2y8RqmNc78eS6sP/DHCQ ppNDwEmagsCRCaVC
AFFMQ80yA81pfhxtJJtUAKAJv7g5uiMKK21HKgxc6E+GM7O2o8OwcZpN7shV tEn34+/E2p0wJDIu
L9AEX4rG0cU4JA2Flw6zMYjCuK8v7ZMS8ey0IWNtSAaEdYWxURJHSQi9xpgM nEhhQfSEZJSOzQl+
/31b48aD66oN5rqZPw5ngfS/AHNiOmZGD3HBWgzi0M90O9WWIQeBhsSlKIy5 /XAwnuzEh/jTBSEa
Q0HZIfURcBjyP0aaFKkWxDBbdOJQrQmjxAQrCP4Kswph9Wmi/9YSxFHwqDBW VSUofHTHpAkWfqI1
BYZL1gN2sLoPUSjPSPVvBZCDpLbmSiiqtAVXtJAGfggAsHEW9jN/W2ThIAvH Q2EugfUaDjLbrXQh
6yYk1I/Go9jfYb5Abemysm4NEnYXqX4G5Y9STMkoViLOFTBlKZfiLxmmwhy1 RmW5QhIl/fD9og4M
lfXUVgZJQwIboZpRFvWQSbVU5b3i1r/blnh4g7DKZYE1PThNiGkyeU2ytqVE /6Y8jAKhCEZRMNnK
QmEWDeH5oGArFHXZEKoWktCi5J5jgVUzP5iwr9a1Q0p+oZZNP6NSIRtldEpI q0SMNgLDHajQiJzB
wxIDhAByyhhbSUpOMIz4T0qNUiRmBZKNMGFEnMKufa11YZQjGQ/T7VE62hoR ABRVdiGSLN3uR5ew
ZWTq+QmgDQBVMMGuxyEpCeJs5IPzqpJJqsqWHKpj0ihfklTBNE6TKubQoxHt yEggjW2tI6Vt3ZEs
iE2qvyMTIkJJj9yTl2iUQ0lJSRyA4et1O9ZjGQSzE0q2ILifJvGOMDdDqZQv K+sot9AEBg5D2CB9
8maq2rRx0USMqPxOBXDKAjgkBVtjYdZnkfUGXVdoGdQSkknNck2kDGBVqWhu 9TPbOqxXr1eFLmNZ
U/JGUzGsjE5sjfo8rxIVmSZbuixjQcpCvbiT+Jv0gIbMK+8r68xU5WWk4Vm6 wow/Eee4btJ44k+i
YHy/0DWYLn/kQ8jYbnXpT658m1+I5zriX9akJZ6kP7v+D1BLAQIWCxQAAAAI ACJaSDOEhiFTJR0A
ANdJAAAKAAAAAAAAAAAAIACAgQAAAABCcndDb2wub2JqUEsFBgAAAAABAAEA OAAAAE0dAAAAAA==
------=_NextPart_000_0030_01C5CBFA.214FD630--
Attached files BrwCol.zip (7.4 KB)Â
Alinear celda del Browse
This is a multi-part message in MIME format.
------=_NextPart_000_001A_01C5CC0C.091D82D0
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_001B_01C5CC0C.091D82D0"
------=_NextPart_001_001B_01C5CC0C.091D82D0
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Jose,
If( Val( cText ) < 2, oSender:SetAlignment( taRIGHT, .T. ), =
oSender:SetAlignment( taLEFT, .T. ) )
No me funciona... el mismo bucle repetitivo!!!
Aunque le saque la lVScroll, siempre hace un repintado del Browse... se =
nota como pinta TODAS las celdas.
Te adjunto un sample por si te puede ayudar a localizar el bucle =
repetitivo.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribi=F3 en el =
mensaje news:[email=43478f2d@ozsrvnegro.ozlan.local...]43478f2d@ozsrvnegro.ozlan.local...[/email]
Xevi,
Puede deberse a un bug en la propiedad Alignment de la Celda????
No es exactamente un bug, pero es cierto que t=FA no tienes la culpa =
;-)
El problema es que al cambiar esa propiedad, se est=E1 forzando =
autom=E1ticamente un repintado del browse, lo que es l=F3gico en =
condiciones normales.
No obstante, aqu=ED tienes una peque=F1a correcci=F3n. Pero en vez de =
cambiar la propiedad usando:
oSender:nAlignment :=3D ...
deber=E1s usar:
oSender:SetAlignment( ..., .F. )
Por favor, pruebalo y dime si te funciona.
--=20
Un saludo,
Jos=E9 F. Gim=E9nez
------=_NextPart_001_001B_01C5CC0C.091D82D0
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2900.2180" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>Jose,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>ÂÂ If( Val( cText ) < 2,=20
oSender:SetAlignment( taRIGHT, .T. ), oSender:SetAlignment( taLEFT, .T. =
)=20
)<BR></FONT></DIV>
<DIV><FONT face=3DArial size=3D2>No me funciona... el mismo bucle=20
repetitivo!!!</FONT></DIV>
<DIV><FONT face=3DArial size=3D2><FONT face=3DArial size=3D2>Aunque le =
saque la=20
lVScroll, siempre hace un repintado del Browse... se nota como pinta =
TODAS las=20
celdas.</FONT></DIV>
<DIV>Â</DIV>
<DIV>Â</DIV>
<DIV>Te adjunto un sample por si te puede ayudar a localizar el bucle=20
repetitivo.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Un Saludo,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Xevi.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Â</DIV></FONT>
<BLOCKQUOTE dir=3Dltr=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV>"Jose F. Gimenez" <jfgimenez@wanadoo.es> =
escribi=F3 en el=20
mensaje <A=20
=
href=3D"news:43478f2d@ozsrvnegro.ozlan.local">news:43478f2d@ozsrvnegro.oz=
lan.local</A>...</DIV>
<DIV><FONT face=3DArial size=3D2>Xevi,</FONT></DIV>
<BLOCKQUOTE dir=3Dltr=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV><FONT face=3DArial size=3D2>Puede deberse a un bug en la =
propiedad=20
Alignment de la Celda????</FONT></DIV></BLOCKQUOTE>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>No es exactamente un bug, =
pero es cierto=20
que t=FA no tienes la culpaÂ</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>El problema es que al =
cambiar esa=20
propiedad, se est=E1 forzando autom=E1ticamente un repintado del =
browse, lo que es=20
l=F3gico en condiciones normales.</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>No obstante, aqu=ED tienes =
una peque=F1a=20
correcci=F3n. Pero en vez de cambiar la propiedad usando:</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>ÂÂÂ =
oSender:nAlignment :=3D=20
...</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>deber=E1s =
usar:</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>ÂÂÂ =
oSender:SetAlignment(=20
..., .F. )</FONT></DIV>
<DIV dir=3Dltr>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV><FONT =
face=3DArial=20
size=3D2>
<DIV dir=3Dltr>Por favor, pruebalo y dime si te funciona.</DIV>
<DIV dir=3Dltr>Â</DIV>
<DIV dir=3Dltr><BR>-- <BR>Un saludo,</DIV>
<DIV>Â</DIV>
<DIV dir=3Dltr>Jos=E9 F. Gim=E9nez</DIV>
<DIV dir=3Dltr></FONT>Â</DIV></BLOCKQUOTE></BODY></HTML >
------=_NextPart_001_001B_01C5CC0C.091D82D0--
------=_NextPart_000_001A_01C5CC0C.091D82D0
Content-Type: application/x-zip-compressed;
name="PruebaBucleOnDrawCell.zip"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
filename="PruebaBucleOnDrawCell.zip"
UEsDBBQAAgAIAJJqSDNnBY2ueQEAAHkCAAAZAAAAUHJ1ZWJhQnVjbGVPbkRy YXdDZWxsLnhwanVR
QU7DMBC8R8pXIgpnS9CkFUENiZIIkICD425bg2Nba7ulv2edAOIAJ8/sjsfr 2eemre9Wef+aJv3Z
AoMPSJMCnEBpvTSaNRhg4MsgFNS6QH7KQak0qYO3wf/dzSaT3IxWKkD2cctx MAHTpOJSV2YbFLC1
wXGRWdxTNSgvrYJSO8+1AMeyPkuTp6biWu7A+ZmXgqZJk4YjH8EDOiL1qmLZ mpoPxOO0i+wiTVpQ
wB0wgssg1TaCOA3XZ3bdmZ2P1J5buT94MumRb6Hi+B4dSTeC9hE+101f1vcd RXMTvBm5l6KC8cix
AKFojCmf6fkChrAv9c7MtAvWIji3kRruwzgAxh6Ov258S7qDQS+C91Lv584j R62JbeAIii0oH4NQ
T8uIU1XcrinWWZtTzSigTL8KUUuvvpM+/qAoW9pt3Zar+IuOliCgkMhmRJlq ocJ2Kn3BmJ770X1j
Snp4iwU6yHZdbibDxT/7n9Z6+XvHV/HmyxJPuVGZiSafUEsDBBQAAgAIAJJq SDNIdWJj2QAAAFAB
AAAgAAAAU291cmNlL1BydWViYUJ1Y2xlT25EcmF3Q2VsbC5wcmd1j0FLxEAM he+F/odQL+0etl1B
kAEPq8veVmXdg9eYBhsYZ0qcofi79w84M3oQ0UsIj++9l/QrqCtYwaP6D6bg Tdoiv+BtJMsPbqe4
3LG1hdkLTaz/IetZXwu243dSmUnOzsDhPEbrYWRgFxRHBASbxmyFMCPFso3B q/kqYZrQwHDdb4b+
chiustrXVV1diCMbU1LzjGJZ1zQ1WU+nE49RGQ4oru2yBgDbuXQE8c7QSYJl MDfQ/Hl7Uxynvde3
TduZe17an37ozNPklxz9K/gYvwuPHKKmZz4BUEsDBBQAAgAIABlrSDPK72KJ rAEAAIwEAAAQAAAA
U291cmNlL0Zvcm0xLnByZ72Sz27bMAzG7wHyDoR3cQsvjgsUGLzu4PrPEiCx g8QbduVkNhGgSJ1q
o+2GPnVfYJKctCmGYhvaTSf600fS/FHh8XAAx7DQ6pZYq2ITdfQVzzsmqJKZ xuuUhHCegrMNaWMp
lN5Go0u9dnJGV0zzS8bvZeyEpGuV7sOC2AZjGL8Lo3F4Mh6fWjUcDoaDN1wy 0TUE3hfkgvSIbTyr
p7NktYLatYBiWc372F4BQFrNF1WZlzWoRGu8Pdfq+oqi3e08rydVBqkmbMlm +UeH+mFG7/FBrUg2
pOF5oxLdVkZ7EA8ZAbCabtoAZCr0Y7RASQGICV9vZrwlW3c4yMvMjfV07p7i zcXWzR2Gb1/12Jp/
MjccAncQhGIoQO6YGh1k/CGCWsGpU8xJsGl8iOMnS4jRfWXYYgA/QAYwvfBB np0E4Bl0DULPEiGC
RHBJaCQEgWB+xL4TL3i/b/C35zcNpt+/dZx0g54Z+G637NIszQ65zOtPyxJK Lv7nHl74rH5dm4X9
GU0lV8A4zsCQ35WNV9QaJGu5Jdn60OJy+nFSBzCqR3D0vGuWF3uThfavSf0E UEsDBBQAAgAIABlr
SDPbM2z+VwEAAJEDAAAQAAAAU291cmNlL0Zvcm0xLnhmba1STW+CMBi+m/gf 3nDCxAMwcEqygyCG
LVMS2s3syLBOEmyXgmH796OlYt2yxCy7NPC8fZ8vWEU4ThYQcpLVZMn4wRxB +DhHCLB4s4eD4QAA
0PGdcF+/JWHfR6QO2JFuKxMcxxqDLQ5PHO7MgdOtHJOPGvw7MCSpoWC2ZFTC WDyYIyVggrFCgDJa
ASK82BljmI5BUFpWT0nDsiC03hTbei8oPNu5nMSkeNtLdtebqpHiH6lUm3sc QxI8RCEWbuacZ58B
Z01FbOlKA1pza9KYraFypzwIRj1+63Hitia91unNrXW+pcvggDchK48HemL8 LtyvCf48JtmWcFld
t6bKU3Pa55+5Op7QBc+akJSlXNUFFM1pfkF37qcDovVCVfXfMZxfYjjTyZ8N pSRvP89VhjRB92o9
v3xGOWddp6/VS4T6SUK7zZ9tS7gPeymg2NMIP6Vr+WsNB19QSwMEFAACAAgA IFpIM4SGIVMcHQAA
10kAAA4AAABPYmovQnJ3Q29sLm9iapVcDXQc1XV+M/ujXWn1Y1myJVvC/8EG A2OwwWBCWO2upA2r
3c3uam0RkbHsXdtSxitFkkFywDgtngChCUlIyR8NtCSEJG0aQpvQkr+GJqHQ Nj1Nm/S0J21PLSmc
pm16ymnTNqfud99787NPK+r6HHnud+99995333133qy0c76ZRQZm70lMW9ce Zw92M8bWDUzPWhO1
ytbE1VdvPXDtgWv3sQfXMfYTT2/7ncM3sAcDjL3GfvUgC5ml1JFSMJFLpkAn 46V4kP4LJ4cKudF8
0BwoFgP4CZvpbLpkRuh/krOPNrFn0wFNZ5y6eCgYEhRjTRFOpcMs2szYx8Ms fClwSWePfFNvN4cH
zMHRrHkknsjEi0W23mGYZiJTNPPxQnyEratjprPFEmtzWPlEbjRbYp0OxiXO R/lsDaVKxbFiIpfJ
FVif63GgcBis0RHYiKezYg4bGkgHckdYj8tP5LKlQi5DNgdBNpAUpcQNqZTI jeRz2RR4rQ4vXkzE
sx5MjeRLYyzmwGw8m2QtDhqJH2FuosrxTGksn/Imh0u6WCwV0tkhL1GlQjxb HMwVRjwrmVTWkxdS
+Uw6ES+lPHkWyenylsMcSWVHB1JD6aznSnLTpdSINzvJTNVFjFEdDhhMZzKF VMKXqkQhBdfFXCad
HCiMFoc9v8lUJlVK5QbeSvpddVPM5IYQccaLJp8rlkZSxWJ8KOWb+FAhnUwl 0yUvY/FMBtkZ8QIq
5WS63CIqjg6AxZrdIeT81DHz7tP52enj1bm54uLpY9PWHBaMc1ML1eNn5quM PbqZMc2Ns5QccMum
j6nSIz7pfpJCRev2jR10xZlV4iN+cYXEvRB7JebK7l0l80r5McieHAlojE01 nfrRIcZO/TE4p/CD
boB/v/xSx7cffXRKcE59P+ayY2C7/FJrY/6lNfgX2hrzH29vzN/Y0Zjfu6Ux /7tr8ENbG/MTa/DT
2xrzf20Nfv/2xvwza/C/vAa/aWdj/vE1+H+6Bv8vdzXmt72pMX9wDf5n1uAH djfmv20NfmhPY/5r
a/AXrl5jXtc05m+/rjH/39bgv2A05r+yrzH/musb8w/7+eyJT2sXAyX9YmtJ f7qzvPPiFtA7Qe8p
77p4E+hbQcdB50CXQI+BPgnaAv0u0PeDfgD0Q6AfB/1J0E+B/iLo50G/APq7 oF8F/Weg/xb0RdCv
gf4P0L8o6Z/WyruW2kv6UhfoXtBXgt4Leh/ot4BOgk6DPgx6HPQE6GnQ86AX Qb8X9COgPwj6U6Cf
Bv0s6K+AfhH0t0D/KegfgP4r0Cugfwr6X0FfKunLwZL+mWh51/JG0H2gt4G+ DvR+0DeDHgKdAf02
0CboCuhJ0PeAvhf0e0B/APRjoD8G+hnQXwD9JdDfAP0S6JdB/xD034D+e9D/ Avp10P9Z3rXSVNJX
YiX9mXWgkf8V5P8Z5H8F+V9B/p9B/tmTwSBOJndh7XAsYdSd0QbZFPC3mPev dr3gO//uVvAvKfoP
KfhRRf/jCn5K0f+SIn9R4v0yvpcV/b+Q8oyU/4PEFYn/VdH/Hym/V8qjN4jr YxJ33VCv36fgvQq+
UcG3KTin4HFgpJ29JP29S+K/kdiW+FZN4E9K/IDEX7qhPj9fk/LX5fi/kDgm 9X8msSVxcL/Az0vc
I3FJ4qslflXilMQXJTYlflEX+G6Jd0r5I/vr5/sRKf+p1P+iIn9Byr8g439F 4kek/l8r+ksK/hcF
/4eCfyHt7ZX22g7U52/HASGfl/KDinxIyn8g5W+X+JNyvjMH6v3dq+AHFPx+ BT8u7SWl/c9L/LTE
fyBxl8Q/lPgX0v8/STwu5YEb6+PvUvCuG+v9syee1S4ytM1ISbvYgetW/Owu axcNXA+W9Yu345rH
z1H8nCoHLs7gulAOXjyP66P4+Wg5dPFJXD+L8b+N6zfx8z3Q38f1R7j+Ha4/ w8/PS9oS/CzBzxL8
LMHPEnwswf4S7C/B/hJsLy1ADttLD+IK+0sfxRX2l2B/CfaXvloOL8HHEnws wccSfCzBx9JPcIWf
JfhZhp9l+FmGn+UeXOFreTeu8Ld8EFf4XB7GFX6X4Xf5FGj4XobfZfhdht9l +F2G32X4XIa/Zfha
hp9l+FmGn+Wfl5tW4GcFflbgZ6WnHFmBnxX4WYGfFfhZgZ8V+FiBjxXYX4H9 Fdhfgf0V2F+B/RXM
awU+Vr6KK/ysYF4r8LXyo3J0Bf5WflJuXoG/lZ+XW0TLDhrKEt6m4KyCx5QS MBV5VcGWgs8o+H4F
2wr+gII/puCnFPw5BX9Fwd9U4v+Ogl9R9H+o4B8reFnB/6zg/1Jw8031uFfB OxR8rYLfrOBhBRcU
fKeCJxR8SsEzCl5Q8AUFv0/BH1bwJ26qz++nFPmzCn5OwS8o+NsKflXBf6ng i4r/nyry1xUcOFiP
WxS8ScE7FXy9gm9RcErB2YP18d2pyKuKfFrBc4r+uYOihQcDQu9hRf+xg2rL 3iNattOuRauO1bVq
atNOi6b27LRmastuSy63ipZcbnvDlkztmFoxtWFqwdR+qfVS26VWSO2WWi21 WWqx1F7d1lpud1sr
tdWGLbXcQS2Vt1NqpdRGqYU2bJ/ldbx98tZZ7hSts7yet07eNtE+RdvsorYp WmbkE0oKP6PgLyr4
6wr+I2VJ/kSR/1jBryn4P5Xx4ZvrcefNogT6ZAlsubl+/G5F/wZFHlfwiILf oeBpxd6cIn+3gh9Q
9H9FkT+myD+t4OcU/RcV/D0Ff1/BP1bwPyr43xUcvEVpCbfUx9OjyHco+DoF 36Tg2xWcUnBOwW9X
8DEFWwqeU/D9Cn6fgj+i4E8p+FkFP6fk4+uK/GVF/ueK/McKfk3Bryv4vxUc PVSPexS8R8EHFDyg
4BEFFw+pLXPf6pZJ7XK43L2qZT5Y3iBPthtXn2zLPf4Wytsntc6ecm9d+xwu b3Jb6KnyZnGyLfdd
ViuNlPvXbKf/Vyv1t9Ge8hVuKz1Y3tKwnTqtlNqo00KpfbqtM3anksoJBb9T wfMKvk/BDyv4cQX/
+qH60vucgr+s6H9DkX9HwS8D99AHCAGBW/VL86+yc7rGTmqsEukbNDRm6ZUY m2qlT6v5L4DOnK4x
K1CZaj3i58S0Gb2gMSNII2dY2ggJ4vFe3QpXHBTT8prVBHuL7X3dRoSYpmZF wZjRa029uqnVmnwx
6BTDaS+GI2oMLSUlAh0DdXahnxktNHyqZTo5MT8xOFm1KqxSMfVohf7NNKdt jULVnVD1ulD1RqHq
bxhqgEIddkNtKyWPnaiPte1IHYuHG+AJCzhRBOqiCDSKIvCGUQQRRf8PmBfG kVVhrEpZUKRsN09Z
ECk7ztOVnThdZVOoAn/SdPJiB4w27mrR1KeaaiK5QY1FozPhtB30CZuFMFOt efLQanmyetyThykj
QScjwbqMBBtlJPiGGQnRugy4CfHPnmfjiJKNEF+RkOM/VOc/pPpnT6RZw9bp b5sL5a2ydW5zT5yf
LW/nbfOr5R3OhwKipXTQlEJvOKUwLfJLbd6cjqgrnJg+PTNdq9bmxZzCYoUP 8RUOs6mYlZ+YhXRw
GhoLfIHHOvkRy1gHz2DM6GF3m4gx4WmuXZkKlziBQVORoaqwMRUpSqoyFcmn TEHS8JAc3jaRqkzO
Zybn5kvVhXkWZKKuxq4VbjvhFl61tLEe1AyrpPo6jS4mEUl6A5Uw9hCMF+dn J2snyZRwEZUu2l0X
A9NnapVVProb+dhweT5apI+WwUlrvjqbunvCWrU3WqVO5PhwdaJSnXUVrI1t UqXNVRmcnp73q/Q4
Ku1SJXq8ND1tzU/OeDq9jk6Hq5OfPD5/Znb1Pl3nOeIBOwrWprapZlorwZXa nY69WsKa5etjba6M
R2KatDkVRUpQYNOzIhvr/fr5iVqV64fW1N/gZK8WtyZP1k5TYS6KOfVhTlNN 8xOZ1GCJLaL+pyLz
E4X00HCJjesEo/MTiVS2lCqw8TDh9UJ3OBVPpgqO5HaSdPol0sRWKeBQSLin 8U4SdNUJHGMD0o3A
/kEb5CC/RDp6E332FGU0241OydcGTs+smnD//zHhoGgDXTq31eNmDrZGJmZP TtbYeHPdUvdKlaba
4cnK/Cnhx7qizdrilMsmZwvXitOzbiBbeSDH5rK5bEoEEjs2Fy9ibkn6ZfdZ 4rQem0umXNb4JYov
wAPbLG221kSxp09PnKw6prc5nvtcLVHvdVrbHa1+qdVcow1cWpxxVXaIGKte jOFj1aFUyYmOaHNg
tFTKZWW5tAleJl0s0R9ijAd4DR2rOkqU26nmY1VXIURzCvM5XeG0Rx4Hblon kc7xS3XZ3uKUvlWe
nJs8ZlVl/7R2OrPZZuwSGrlaYrY6MV9Fa5mKTBerNeoJM4G0vV1qrMvVhmYn K+RsDc0dUrMtJ9Oc
sCaPv5PUNku1vbVBa+Lk3N5afnruCP9/jI/c6Y0Uqb/skbvkyFiuRkenyx73 Jjmu3Ym1cNlDr/SG
imAvf+huObRVRHv5A/d4iyDCTR6zLnvwVd5gEfD/Z/DV3mwp5DWGijbQ09DC XmmhKccrlUb2OiPL
E9aZ6l5r5AzuHVxIA66RA1pyZGTeGdSvDEpM1I5XrWplb+2O6iIfeK03cGC+ 5sbZVjeQa17naSZn
J+5JVC2LNK9yNI/TfWWvc4PZ69w59lrDkydPZSbnhRVDWmnG1qjOU3rISLdi RLQR0t/neYW+iMY/
YEEdcL23LxKnJmonq6JpYkyfm/ts9R7O3VvLWRUhp6H7+dn3Rqcjr3qwsN7U hoci3Pl8AmoINzkj
3uBcfTMdisPcEDqAc36ITDvHhOZpp1NQAxYH5Vt8Y5pqacS+4J2iD0khnbJD tOie6M3GlaJ6ZNOx
dreZ+vkOFp0Jpu3bpDDEfVl7IOL8txhXiUFFFMjxeTa2mT9HGlczYy8/PxnX 8MuMFpYj4jxdA744
YrXk5NyMNbGIo4EXTtIJJ16ZOoPzlnWt4zMlJc35icmaKAbrOkc46AhTsxNz VSE0HOGQFAYHpheY
tc9hD0t21N0E1vWOLO3Y805H1g2O8K2OcMgTbnKEdzhWIRTVgruvlGUcWdGV bXFkIzKlsYRVnZiV
Zse2iLzuZ8YBnlDeBvr448iNYKBwvBRnnUUZnqhVcCsai/LBi448J+XN6Tnn bjXWLuzfxI07im/j
a1WQwbbzFKBUc8emaK1R2FKvKDVaoeGdbHCIE/JzepDZZV9ZtvNeQHuwOL8I 7+6iH5ZKUSoLy9eV
XI0xJ3PJ6gkx2DrohHGnlMX4rRPPGrMoKOtmR/x2R4wo3RMFzhJSPO4sJhWN XJRbHOFdUthCwuEq
ehPmd8iRvsNXJHKT4nAvhaa/gsS+xbFeCo9KYQeEdcdCHAilyoTjGirOcuFY IaXHpJSetPgxDgc4
KTruG+g8NOBhQUorPql4SJxj1q2OtOqvbGRy9x5mvdkRnqibkRDe5ghP+qrF fwbE6U9qnPLXk+/8
h5Of0KAn7bDzpB2ue9ION3rSDzd4LNb0E/nAhc/TU7vxFmYGZqiwtbStG7cD rTqNzGjJvh12wIhD
ONbNAtgNAWYMMPOSqWOwHsbYXt0OR6mtBfhD4q60lagYSSY5M2IP0Tg8T16K hGP6YqRvo91kpBwV
M0BP0GSn2RjknLQdMwMUrXYir1/4GjOGcMtxAj1AD5/kqRuBDTOJuZRCMdLM FG1gK9iukZeZ8Vaf
kTsUI3coRjIc0+cIPGE/BKxE+poW8jrEujFCQXNTQSMrQw5buYqVr9z1M5iJ 6d35YEzra7abTC0f
7D1gN5vB8Y4IGC3n8KTduxMzDI5vJUbrOcTau95uA+N2YrSfwwkbbtabev+9 zO6mGQZksBuMtzGJ
zaAItpeCd+SbSH5Hnbw/isCMgrcgMSxqe9ooepy+9TjNlzyMYRi4wxjl2M0h 04yyl0OfWX2VWV2a
DUizujSL1B52UiuMxjRTM45wXqSv3XZoqlgkd8z1F74Mf9tRVnf6/NkR1X2L a16679eMt69VXOOr
i8tXN00kr6+b5opr9xrNuGstu+9Ybdd0642PPoSkUL1F8xrVG838KNeIad1b QqY22L9Ns4PnAozx
sjMmpDDZV0FcrrP9SMAxZhwnf24acPgQ6nVM/Xwzywd6d2APYkRFKEg9qSRV dLuNXFYdl/1zzG73
EnPI7rBOVMyAdHxHnWMxqI5JVmM67F5ld7oDpf/qKv9cU7c3CM2TIgb9fBiB 4emfTqaoWJ7TPmSM
t4Gd9Qt+l0ztgkhtNOqla13amHSWZobaaChtan2bsGI4S+jGlCdzlu2d9bYn Na7pbJA3sLzPDiCJ
aBQaNklQnl9kla6HYUstkWbPV4D7uleTJYGZ65QObbwZ2UFZUGtKwUPIOA2F oxptYj0fpB1Uq5ho
S1N6hoVocsG+qN1Uoa3Gt8YpN/ZWf8G2GdNqNOv8G6GT5PUbofuyNuuG+s26 Ud2sm8RMOu3NfCa4
fwTEfeIKb589qRkza+2zd63aZ964L2jG7Fr3g3etuh/QuAA7kdcu/J5mzNGH vkcDKEgaOc+rFafD
KX3AOd0j3WhetMABmvhWO0QLpBtnmHG3q0NZ0fn9JGLiBt0a4fZf0c6FsKu1 +3HEZLZ+LoL/yZJx
Dx+FetkFawsVHsVRnR2NwJtzswmbQTLYe5sdNRbr5ZjaBrvZOosCcEyR8y47 Rjzdx8P+fTc4OE40
2Z1m02J7/4eYvd641wv8bHvfnXbXuTAOwd1m2Gza3pfGjrwPg46G+Q61N1rn KpQPsoQUcF4P5SAk
dzd9hBxwsyU2dqj3ud5d9mZVTV+lpttbKLcRyu02e6txv5JW4zwnh58h1R3y NLA75K796/Xd1XiP
WwhBE/01ZvySqIbIYF8bdlGWI6qDiPHLghadXlREWMddn26VcDnezqeqWQ9U JuhXh3exrXexSCxA
5WAGcPDpwOI9gEQt8uzvw4oFxvVI3zq7ibPHdc7vRUkExsOkHuX8s7JSYsoy rLNbxbgOrrDObhdw
63iQO+00Ljgf49tdvMpC/DyzQzds3+0eOXivB5PoCgHeFXBzeXfdWY4XRcR6 sFJZqMBB0I5SFYga
mESP8qmaYS0fQngP8btTCGfshyv18pheIfPv85s/m6L8X8MHnE0N0oMXqGg0 2hWx2+6Dr97HMMdH
Kl0MPehX3BNkkE8ykLbX07o0hU7kwxdu1ceDAY3lI3bIDIrlDuIUHAIZoT2G 6TUZ70ccaKEtdtRs
wVY5i0aLKo6wcR0N0WxBaZF8mDgBpJ9uLxwEcRc0PsD9hynyfBT3wEd9uNle Zzaj0XdiD0XGA9o6
YYJ6o9k8HuqAYIMi6I2SZEdfU9oMYW070P8iZ7n8rM7PcWYwScIoN3sFRgfF 6CCJt3FxBGJhfbsi
32V9sMIdGh/ywozpcmZXGh/mLPmbiQh61m7rMdxUzAi18Y94Q2ZYV6B3t32V 9asVOQZFEbOvltpm
rCtg77Uer4DQ7OtoOSK85OZ1cYSOyiP0R/nKLUa6tzQbH+P0INVdlOpOLut7 sUAfZ5WH2PlLl4xP
EBE3PkmX4XwYe/H9XAkFGaVlAnn+fy5htZuFKoEobmqPEqC0ijawt8OO3dd0 6ZLdel9EoxpoFxqL
dPLukLxOLK0c1Wyvvy/Kmd2CyRU3SF6P8QSrLDyk0e8Vfo1VqHARB/DDOH8s iviCWCqqv3X2Fmra
gaNBeXzYbnxKQHr8wV7ZGbWeROtDJw+jAmgX7hLZWC+zscd4yjnp77evMn4d Dp9yHNpXG7/BjKcp
QtrBnfZe49MuFuf566LGZwj3beePaM8QLR/OgvREp9HDWXeeqvZa2zA+yypT Gje9z3jWpa8nvvE5
Gms2a+D09tv7SU53EBnKAdIxg0TeZHweoi+4ooPGb0LUhI4RMaMLD4Xos7zf kim8xfgimU3bh0w9
2ddq32r8NscI/TY0bLqBvcX6Eh0rwL1LRxNHJeoP24kF6uy8F39N935bGbU1 0cSC3llEk2eR/h7N
eA6Qfin8ZXpCxpJQtT3PVc7Sg0jE+B1WWURcm97DUGFCQr26DRUG0Vma+wkU mJQEaFCMJOM6ie7A
IUqKgpG+HrQLOQgV97tixr1X2h2OTijS14uW5gxHCTpKut1lfAVJo2SjCLuQ z6/yMYQ3GBuAX3Dx
Rjz/VervR8TuwfN+RSYAhnSqV6Q9yit1s/F7XKCcrP5eN37fd0JaL09I/Z9l kn4v7o3Pc4onLOxP
WJOUiIRFfAmLOhKesGZ/wlocEU9YzE1Yqy9hbY4OT1i7l7AOL2EP2518vz7v ns55B/qFTo1GtAED
9eirEP95IGy8iHJdkL/55hsv6iQL8X6NDi5f5/Uv7zktYpuh5BII2tuFfbvt Vjw/dCLmb/i2YgdC
/aZ/a+Jw9S1WqcjQe40/cG5rlQU6Ym7m8URpFfor7hPitgAd5jU6zCdwmB/B mcP3HIibh25821k9
/iT9tHe2RqSbsXYvMT+TNOnZqjeCwwco3P4CWO0PM8zpD53nKizFd0CPXcE/ FrW+W7G+V0EyqA3J
rRXT6DMhTPll0usSH5/6NLi0/bI+O+hQnwc6F/hqdYt4eF1ujNI5TL9we8D6 I7r/0PkpiOehVypT
gdZmHAzowIj1DaGpbcPZC0rBs2YINxQcXwI4foXO63R7eUbv3YB5B8GL0qEV 8ziPs4PufBClXygE
yDwlRh/r5V8wCjCUhXmJziiX0HNntHCt6cyrLMya/F9VZtnUYeZ8Ad//vXvx PW027JPwL9/L79wn
cgCF0UQpV0jEMxnm++q9/7vOLJ5M5gu5fKpQGmN1X3Nmdd9qJr2R0Uwpzb+J X/JpeaTz3XpzME5f
8qZf+tLLCljO/dq3Gaevpxf9GgOINukIBPB9vR8mxS/+FeZgLldaxSzlcggw 7+fSiwDSGVL1v2ag
flg8kx7KjtALAOr5AyP5hiJYOpwWbWB/sjSsjDqcXs0r5gqlhrNKj9D34xtN rZGEUsZfL1DPLqeL
6YFMilYoVV49jcF0KpOUX9qnRYTvXF2OZSH5OHytoJvOZtLZFNY1g8GQsRwq iDxk87mif0A8+dbR
Yp1j760NfruFeDGlMunvAvwDc0U+0VWz4KuYyKTiBUnnZGWYgwnJyTip8I1N pgaLpbHMqvnJF0LU
qSKyVctHzOEU/4uR+ogEhTSoL51Y9a4J3ysm+AJhv6KsUqj6XFb+WUsik07c wXxWxSso4oBFWgme
/KxcKUzYmXqCbzAPIxViZ+Tk1WWYg1mvmt2kiFdb8DdamD75MBiQZgqpZCF+ mBVSg4VUcZj5TcBe
3QZRobsWpkciQ8l0MZ+Jj/F5IVpny5oeNZjl28UUl0HnIhbGmSgs0cwFM8ez 7KTfmTC9mMNbUdOx
kE1nk6kjzGsMbvV4VYZMIwNDKTHCeamHmXVNubuXPfmTgM4ODpFUbFlI/Ts4 l6VJU8nLkGUtZeU1
x9WoEbJEPp0ojRZSzP/SED4eEYymmPfaEHpbSJaM0vYsMlgtxBMlvle9d4c4 88WyjMQL9KqQIac7
ZWlVKRhZBL7tQC8aMRU5KjGBFkCbMoNbSY42wXCa/5FS3atI/G8gGUpluSCT Q13H5aoz3+tIisO5
w/lcfjRPDETk1gXLFnKHk+kybhkF4T8Lbh2D3mCCux5vSdlEppCPY+bum0xy 4rUlq95jUvf6kqzb
TDO5rNtzyDW6HRUJsnFYrpFYbQlMnogRev+OmaUgRPZoe3ITda9DydEi8QaM ve7RGanLWSg7JnKL
gJO5bGaM+W+Gplh8060O5xaaRYGjEIZoPfnNVNB046KB0HD3nWjgdArgLSkx WmT+97OY3g3ae0PL
oJchM+tN2QvSTKCqcqz+Vq/c1lG90p7bunxm/Zn3kWLCoujYaD7Jx7mpotLk lW46vSDHkzowlo2P
kIO6nLu7z3nPjPt6GdO3s+QbZuIltpu/N6lYipfSieIeJt/BNDN7kl7O0kx/ 5Mq/zc/YEyF2US9p
7H30x67/C1BLAQIUABQAAgAIAJJqSDNnBY2ueQEAAHkCAAAZAAAAAAAAAAAA IAC0gQAAAABQcnVl
YmFCdWNsZU9uRHJhd0NlbGwueHBqUEsBAhQAFAACAAgAkmpIM0h1YmPZAAAA UAEAACAAAAAAAAAA
AAAgALSBsAEAAFNvdXJjZS9QcnVlYmFCdWNsZU9uRHJhd0NlbGwucHJnUEsB AhQAFAACAAgAGWtI
M8rvYomsAQAAjAQAABAAAAAAAAAAAAAgALSBxwIAAFNvdXJjZS9Gb3JtMS5w cmdQSwECFAAUAAIA
CAAZa0gz2zNs/lcBAACRAwAAEAAAAAAAAAAAACAAtIGhBAAAU291cmNlL0Zv cm0xLnhmbVBLAQIU
ABQAAgAIACBaSDOEhiFTHB0AANdJAAAOAAAAAAAAAAAAIAC0gSYGAABPYmov QnJ3Q29sLm9ialBL
BQYAAAAABQAFAE0BAABuIwAAAAA=
------=_NextPart_000_001A_01C5CC0C.091D82D0--
Attached files PruebaBucleOnDrawCell.zip (9.2 KB)Â
------=_NextPart_000_001A_01C5CC0C.091D82D0
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_001B_01C5CC0C.091D82D0"
------=_NextPart_001_001B_01C5CC0C.091D82D0
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Jose,
If( Val( cText ) < 2, oSender:SetAlignment( taRIGHT, .T. ), =
oSender:SetAlignment( taLEFT, .T. ) )
No me funciona... el mismo bucle repetitivo!!!
Aunque le saque la lVScroll, siempre hace un repintado del Browse... se =
nota como pinta TODAS las celdas.
Te adjunto un sample por si te puede ayudar a localizar el bucle =
repetitivo.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribi=F3 en el =
mensaje news:[email=43478f2d@ozsrvnegro.ozlan.local...]43478f2d@ozsrvnegro.ozlan.local...[/email]
Xevi,
Puede deberse a un bug en la propiedad Alignment de la Celda????
No es exactamente un bug, pero es cierto que t=FA no tienes la culpa =
;-)
El problema es que al cambiar esa propiedad, se est=E1 forzando =
autom=E1ticamente un repintado del browse, lo que es l=F3gico en =
condiciones normales.
No obstante, aqu=ED tienes una peque=F1a correcci=F3n. Pero en vez de =
cambiar la propiedad usando:
oSender:nAlignment :=3D ...
deber=E1s usar:
oSender:SetAlignment( ..., .F. )
Por favor, pruebalo y dime si te funciona.
--=20
Un saludo,
Jos=E9 F. Gim=E9nez
------=_NextPart_001_001B_01C5CC0C.091D82D0
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2900.2180" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>Jose,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>ÂÂ If( Val( cText ) < 2,=20
oSender:SetAlignment( taRIGHT, .T. ), oSender:SetAlignment( taLEFT, .T. =
)=20
)<BR></FONT></DIV>
<DIV><FONT face=3DArial size=3D2>No me funciona... el mismo bucle=20
repetitivo!!!</FONT></DIV>
<DIV><FONT face=3DArial size=3D2><FONT face=3DArial size=3D2>Aunque le =
saque la=20
lVScroll, siempre hace un repintado del Browse... se nota como pinta =
TODAS las=20
celdas.</FONT></DIV>
<DIV>Â</DIV>
<DIV>Â</DIV>
<DIV>Te adjunto un sample por si te puede ayudar a localizar el bucle=20
repetitivo.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Un Saludo,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Xevi.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Â</DIV></FONT>
<BLOCKQUOTE dir=3Dltr=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV>"Jose F. Gimenez" <jfgimenez@wanadoo.es> =
escribi=F3 en el=20
mensaje <A=20
=
href=3D"news:43478f2d@ozsrvnegro.ozlan.local">news:43478f2d@ozsrvnegro.oz=
lan.local</A>...</DIV>
<DIV><FONT face=3DArial size=3D2>Xevi,</FONT></DIV>
<BLOCKQUOTE dir=3Dltr=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV><FONT face=3DArial size=3D2>Puede deberse a un bug en la =
propiedad=20
Alignment de la Celda????</FONT></DIV></BLOCKQUOTE>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>No es exactamente un bug, =
pero es cierto=20
que t=FA no tienes la culpaÂ
</FONT></DIV><DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>El problema es que al =
cambiar esa=20
propiedad, se est=E1 forzando autom=E1ticamente un repintado del =
browse, lo que es=20
l=F3gico en condiciones normales.</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>No obstante, aqu=ED tienes =
una peque=F1a=20
correcci=F3n. Pero en vez de cambiar la propiedad usando:</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>ÂÂÂ =
oSender:nAlignment :=3D=20
...</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>deber=E1s =
usar:</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>ÂÂÂ =
oSender:SetAlignment(=20
..., .F. )</FONT></DIV>
<DIV dir=3Dltr>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV><FONT =
face=3DArial=20
size=3D2>
<DIV dir=3Dltr>Por favor, pruebalo y dime si te funciona.</DIV>
<DIV dir=3Dltr>Â</DIV>
<DIV dir=3Dltr><BR>-- <BR>Un saludo,</DIV>
<DIV>Â</DIV>
<DIV dir=3Dltr>Jos=E9 F. Gim=E9nez</DIV>
<DIV dir=3Dltr></FONT>Â</DIV></BLOCKQUOTE></BODY></HTML >
------=_NextPart_001_001B_01C5CC0C.091D82D0--
------=_NextPart_000_001A_01C5CC0C.091D82D0
Content-Type: application/x-zip-compressed;
name="PruebaBucleOnDrawCell.zip"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
filename="PruebaBucleOnDrawCell.zip"
UEsDBBQAAgAIAJJqSDNnBY2ueQEAAHkCAAAZAAAAUHJ1ZWJhQnVjbGVPbkRy YXdDZWxsLnhwanVR
QU7DMBC8R8pXIgpnS9CkFUENiZIIkICD425bg2Nba7ulv2edAOIAJ8/sjsfr 2eemre9Wef+aJv3Z
AoMPSJMCnEBpvTSaNRhg4MsgFNS6QH7KQak0qYO3wf/dzSaT3IxWKkD2cctx MAHTpOJSV2YbFLC1
wXGRWdxTNSgvrYJSO8+1AMeyPkuTp6biWu7A+ZmXgqZJk4YjH8EDOiL1qmLZ mpoPxOO0i+wiTVpQ
wB0wgssg1TaCOA3XZ3bdmZ2P1J5buT94MumRb6Hi+B4dSTeC9hE+101f1vcd RXMTvBm5l6KC8cix
AKFojCmf6fkChrAv9c7MtAvWIji3kRruwzgAxh6Ov258S7qDQS+C91Lv584j R62JbeAIii0oH4NQ
T8uIU1XcrinWWZtTzSigTL8KUUuvvpM+/qAoW9pt3Zar+IuOliCgkMhmRJlq ocJ2Kn3BmJ770X1j
Snp4iwU6yHZdbibDxT/7n9Z6+XvHV/HmyxJPuVGZiSafUEsDBBQAAgAIAJJq SDNIdWJj2QAAAFAB
AAAgAAAAU291cmNlL1BydWViYUJ1Y2xlT25EcmF3Q2VsbC5wcmd1j0FLxEAM he+F/odQL+0etl1B
kAEPq8veVmXdg9eYBhsYZ0qcofi79w84M3oQ0UsIj++9l/QrqCtYwaP6D6bg Tdoiv+BtJMsPbqe4
3LG1hdkLTaz/IetZXwu243dSmUnOzsDhPEbrYWRgFxRHBASbxmyFMCPFso3B q/kqYZrQwHDdb4b+
chiustrXVV1diCMbU1LzjGJZ1zQ1WU+nE49RGQ4oru2yBgDbuXQE8c7QSYJl MDfQ/Hl7Uxynvde3
TduZe17an37ozNPklxz9K/gYvwuPHKKmZz4BUEsDBBQAAgAIABlrSDPK72KJ rAEAAIwEAAAQAAAA
U291cmNlL0Zvcm0xLnByZ72Sz27bMAzG7wHyDoR3cQsvjgsUGLzu4PrPEiCx g8QbduVkNhGgSJ1q
o+2GPnVfYJKctCmGYhvaTSf600fS/FHh8XAAx7DQ6pZYq2ITdfQVzzsmqJKZ xuuUhHCegrMNaWMp
lN5Go0u9dnJGV0zzS8bvZeyEpGuV7sOC2AZjGL8Lo3F4Mh6fWjUcDoaDN1wy 0TUE3hfkgvSIbTyr
p7NktYLatYBiWc372F4BQFrNF1WZlzWoRGu8Pdfq+oqi3e08rydVBqkmbMlm +UeH+mFG7/FBrUg2
pOF5oxLdVkZ7EA8ZAbCabtoAZCr0Y7RASQGICV9vZrwlW3c4yMvMjfV07p7i zcXWzR2Gb1/12Jp/
MjccAncQhGIoQO6YGh1k/CGCWsGpU8xJsGl8iOMnS4jRfWXYYgA/QAYwvfBB np0E4Bl0DULPEiGC
RHBJaCQEgWB+xL4TL3i/b/C35zcNpt+/dZx0g54Z+G637NIszQ65zOtPyxJK Lv7nHl74rH5dm4X9
GU0lV8A4zsCQ35WNV9QaJGu5Jdn60OJy+nFSBzCqR3D0vGuWF3uThfavSf0E UEsDBBQAAgAIABlr
SDPbM2z+VwEAAJEDAAAQAAAAU291cmNlL0Zvcm0xLnhmba1STW+CMBi+m/gf 3nDCxAMwcEqygyCG
LVMS2s3syLBOEmyXgmH796OlYt2yxCy7NPC8fZ8vWEU4ThYQcpLVZMn4wRxB +DhHCLB4s4eD4QAA
0PGdcF+/JWHfR6QO2JFuKxMcxxqDLQ5PHO7MgdOtHJOPGvw7MCSpoWC2ZFTC WDyYIyVggrFCgDJa
ASK82BljmI5BUFpWT0nDsiC03hTbei8oPNu5nMSkeNtLdtebqpHiH6lUm3sc QxI8RCEWbuacZ58B
Z01FbOlKA1pza9KYraFypzwIRj1+63Hitia91unNrXW+pcvggDchK48HemL8 LtyvCf48JtmWcFld
t6bKU3Pa55+5Op7QBc+akJSlXNUFFM1pfkF37qcDovVCVfXfMZxfYjjTyZ8N pSRvP89VhjRB92o9
v3xGOWddp6/VS4T6SUK7zZ9tS7gPeymg2NMIP6Vr+WsNB19QSwMEFAACAAgA IFpIM4SGIVMcHQAA
10kAAA4AAABPYmovQnJ3Q29sLm9iapVcDXQc1XV+M/ujXWn1Y1myJVvC/8EG A2OwwWBCWO2upA2r
3c3uam0RkbHsXdtSxitFkkFywDgtngChCUlIyR8NtCSEJG0aQpvQkr+GJqHQ Nj1Nm/S0J21PLSmc
pm16ymnTNqfud99787NPK+r6HHnud+99995333133qy0c76ZRQZm70lMW9ce Zw92M8bWDUzPWhO1
ytbE1VdvPXDtgWv3sQfXMfYTT2/7ncM3sAcDjL3GfvUgC5ml1JFSMJFLpkAn 46V4kP4LJ4cKudF8
0BwoFgP4CZvpbLpkRuh/krOPNrFn0wFNZ5y6eCgYEhRjTRFOpcMs2szYx8Ms fClwSWePfFNvN4cH
zMHRrHkknsjEi0W23mGYZiJTNPPxQnyEratjprPFEmtzWPlEbjRbYp0OxiXO R/lsDaVKxbFiIpfJ
FVif63GgcBis0RHYiKezYg4bGkgHckdYj8tP5LKlQi5DNgdBNpAUpcQNqZTI jeRz2RR4rQ4vXkzE
sx5MjeRLYyzmwGw8m2QtDhqJH2FuosrxTGksn/Imh0u6WCwV0tkhL1GlQjxb HMwVRjwrmVTWkxdS
+Uw6ES+lPHkWyenylsMcSWVHB1JD6aznSnLTpdSINzvJTNVFjFEdDhhMZzKF VMKXqkQhBdfFXCad
HCiMFoc9v8lUJlVK5QbeSvpddVPM5IYQccaLJp8rlkZSxWJ8KOWb+FAhnUwl 0yUvY/FMBtkZ8QIq
5WS63CIqjg6AxZrdIeT81DHz7tP52enj1bm54uLpY9PWHBaMc1ML1eNn5quM PbqZMc2Ns5QccMum
j6nSIz7pfpJCRev2jR10xZlV4iN+cYXEvRB7JebK7l0l80r5McieHAlojE01 nfrRIcZO/TE4p/CD
boB/v/xSx7cffXRKcE59P+ayY2C7/FJrY/6lNfgX2hrzH29vzN/Y0Zjfu6Ux /7tr8ENbG/MTa/DT
2xrzf20Nfv/2xvwza/C/vAa/aWdj/vE1+H+6Bv8vdzXmt72pMX9wDf5n1uAH djfmv20NfmhPY/5r
a/AXrl5jXtc05m+/rjH/39bgv2A05r+yrzH/musb8w/7+eyJT2sXAyX9YmtJ f7qzvPPiFtA7Qe8p
77p4E+hbQcdB50CXQI+BPgnaAv0u0PeDfgD0Q6AfB/1J0E+B/iLo50G/APq7 oF8F/Weg/xb0RdCv
gf4P0L8o6Z/WyruW2kv6UhfoXtBXgt4Leh/ot4BOgk6DPgx6HPQE6GnQ86AX Qb8X9COgPwj6U6Cf
Bv0s6K+AfhH0t0D/KegfgP4r0Cugfwr6X0FfKunLwZL+mWh51/JG0H2gt4G+ DvR+0DeDHgKdAf02
0CboCuhJ0PeAvhf0e0B/APRjoD8G+hnQXwD9JdDfAP0S6JdB/xD034D+e9D/ Avp10P9Z3rXSVNJX
YiX9mXWgkf8V5P8Z5H8F+V9B/p9B/tmTwSBOJndh7XAsYdSd0QbZFPC3mPev dr3gO//uVvAvKfoP
KfhRRf/jCn5K0f+SIn9R4v0yvpcV/b+Q8oyU/4PEFYn/VdH/Hym/V8qjN4jr YxJ33VCv36fgvQq+
UcG3KTin4HFgpJ29JP29S+K/kdiW+FZN4E9K/IDEX7qhPj9fk/LX5fi/kDgm 9X8msSVxcL/Az0vc
I3FJ4qslflXilMQXJTYlflEX+G6Jd0r5I/vr5/sRKf+p1P+iIn9Byr8g439F 4kek/l8r+ksK/hcF
/4eCfyHt7ZX22g7U52/HASGfl/KDinxIyn8g5W+X+JNyvjMH6v3dq+AHFPx+ BT8u7SWl/c9L/LTE
fyBxl8Q/lPgX0v8/STwu5YEb6+PvUvCuG+v9syee1S4ytM1ISbvYgetW/Owu axcNXA+W9Yu345rH
z1H8nCoHLs7gulAOXjyP66P4+Wg5dPFJXD+L8b+N6zfx8z3Q38f1R7j+Ha4/ w8/PS9oS/CzBzxL8
LMHPEnwswf4S7C/B/hJsLy1ADttLD+IK+0sfxRX2l2B/CfaXvloOL8HHEnws wccSfCzBx9JPcIWf
JfhZhp9l+FmGn+UeXOFreTeu8Ld8EFf4XB7GFX6X4Xf5FGj4XobfZfhdht9l +F2G32X4XIa/Zfha
hp9l+FmGn+Wfl5tW4GcFflbgZ6WnHFmBnxX4WYGfFfhZgZ8V+FiBjxXYX4H9 Fdhfgf0V2F+B/RXM
awU+Vr6KK/ysYF4r8LXyo3J0Bf5WflJuXoG/lZ+XW0TLDhrKEt6m4KyCx5QS MBV5VcGWgs8o+H4F
2wr+gII/puCnFPw5BX9Fwd9U4v+Ogl9R9H+o4B8reFnB/6zg/1Jw8031uFfB OxR8rYLfrOBhBRcU
fKeCJxR8SsEzCl5Q8AUFv0/BH1bwJ26qz++nFPmzCn5OwS8o+NsKflXBf6ng i4r/nyry1xUcOFiP
WxS8ScE7FXy9gm9RcErB2YP18d2pyKuKfFrBc4r+uYOihQcDQu9hRf+xg2rL 3iNattOuRauO1bVq
atNOi6b27LRmastuSy63ipZcbnvDlkztmFoxtWFqwdR+qfVS26VWSO2WWi21 WWqx1F7d1lpud1sr
tdWGLbXcQS2Vt1NqpdRGqYU2bJ/ldbx98tZZ7hSts7yet07eNtE+RdvsorYp WmbkE0oKP6PgLyr4
6wr+I2VJ/kSR/1jBryn4P5Xx4ZvrcefNogT6ZAlsubl+/G5F/wZFHlfwiILf oeBpxd6cIn+3gh9Q
9H9FkT+myD+t4OcU/RcV/D0Ff1/BP1bwPyr43xUcvEVpCbfUx9OjyHco+DoF 36Tg2xWcUnBOwW9X
8DEFWwqeU/D9Cn6fgj+i4E8p+FkFP6fk4+uK/GVF/ueK/McKfk3Bryv4vxUc PVSPexS8R8EHFDyg
4BEFFw+pLXPf6pZJ7XK43L2qZT5Y3iBPthtXn2zLPf4Wytsntc6ecm9d+xwu b3Jb6KnyZnGyLfdd
ViuNlPvXbKf/Vyv1t9Ge8hVuKz1Y3tKwnTqtlNqo00KpfbqtM3anksoJBb9T wfMKvk/BDyv4cQX/
+qH60vucgr+s6H9DkX9HwS8D99AHCAGBW/VL86+yc7rGTmqsEukbNDRm6ZUY m2qlT6v5L4DOnK4x
K1CZaj3i58S0Gb2gMSNII2dY2ggJ4vFe3QpXHBTT8prVBHuL7X3dRoSYpmZF wZjRa029uqnVmnwx
6BTDaS+GI2oMLSUlAh0DdXahnxktNHyqZTo5MT8xOFm1KqxSMfVohf7NNKdt jULVnVD1ulD1RqHq
bxhqgEIddkNtKyWPnaiPte1IHYuHG+AJCzhRBOqiCDSKIvCGUQQRRf8PmBfG kVVhrEpZUKRsN09Z
ECk7ztOVnThdZVOoAn/SdPJiB4w27mrR1KeaaiK5QY1FozPhtB30CZuFMFOt efLQanmyetyThykj
QScjwbqMBBtlJPiGGQnRugy4CfHPnmfjiJKNEF+RkOM/VOc/pPpnT6RZw9bp b5sL5a2ydW5zT5yf
LW/nbfOr5R3OhwKipXTQlEJvOKUwLfJLbd6cjqgrnJg+PTNdq9bmxZzCYoUP 8RUOs6mYlZ+YhXRw
GhoLfIHHOvkRy1gHz2DM6GF3m4gx4WmuXZkKlziBQVORoaqwMRUpSqoyFcmn TEHS8JAc3jaRqkzO
Zybn5kvVhXkWZKKuxq4VbjvhFl61tLEe1AyrpPo6jS4mEUl6A5Uw9hCMF+dn J2snyZRwEZUu2l0X
A9NnapVVProb+dhweT5apI+WwUlrvjqbunvCWrU3WqVO5PhwdaJSnXUVrI1t UqXNVRmcnp73q/Q4
Ku1SJXq8ND1tzU/OeDq9jk6Hq5OfPD5/Znb1Pl3nOeIBOwrWprapZlorwZXa nY69WsKa5etjba6M
R2KatDkVRUpQYNOzIhvr/fr5iVqV64fW1N/gZK8WtyZP1k5TYS6KOfVhTlNN 8xOZ1GCJLaL+pyLz
E4X00HCJjesEo/MTiVS2lCqw8TDh9UJ3OBVPpgqO5HaSdPol0sRWKeBQSLin 8U4SdNUJHGMD0o3A
/kEb5CC/RDp6E332FGU0241OydcGTs+smnD//zHhoGgDXTq31eNmDrZGJmZP TtbYeHPdUvdKlaba
4cnK/Cnhx7qizdrilMsmZwvXitOzbiBbeSDH5rK5bEoEEjs2Fy9ibkn6ZfdZ 4rQem0umXNb4JYov
wAPbLG221kSxp09PnKw6prc5nvtcLVHvdVrbHa1+qdVcow1cWpxxVXaIGKte jOFj1aFUyYmOaHNg
tFTKZWW5tAleJl0s0R9ijAd4DR2rOkqU26nmY1VXIURzCvM5XeG0Rx4Hblon kc7xS3XZ3uKUvlWe
nJs8ZlVl/7R2OrPZZuwSGrlaYrY6MV9Fa5mKTBerNeoJM4G0vV1qrMvVhmYn K+RsDc0dUrMtJ9Oc
sCaPv5PUNku1vbVBa+Lk3N5afnruCP9/jI/c6Y0Uqb/skbvkyFiuRkenyx73 Jjmu3Ym1cNlDr/SG
imAvf+huObRVRHv5A/d4iyDCTR6zLnvwVd5gEfD/Z/DV3mwp5DWGijbQ09DC XmmhKccrlUb2OiPL
E9aZ6l5r5AzuHVxIA66RA1pyZGTeGdSvDEpM1I5XrWplb+2O6iIfeK03cGC+ 5sbZVjeQa17naSZn
J+5JVC2LNK9yNI/TfWWvc4PZ69w59lrDkydPZSbnhRVDWmnG1qjOU3rISLdi RLQR0t/neYW+iMY/
YEEdcL23LxKnJmonq6JpYkyfm/ts9R7O3VvLWRUhp6H7+dn3Rqcjr3qwsN7U hoci3Pl8AmoINzkj
3uBcfTMdisPcEDqAc36ITDvHhOZpp1NQAxYH5Vt8Y5pqacS+4J2iD0khnbJD tOie6M3GlaJ6ZNOx
dreZ+vkOFp0Jpu3bpDDEfVl7IOL8txhXiUFFFMjxeTa2mT9HGlczYy8/PxnX 8MuMFpYj4jxdA744
YrXk5NyMNbGIo4EXTtIJJ16ZOoPzlnWt4zMlJc35icmaKAbrOkc46AhTsxNz VSE0HOGQFAYHpheY
tc9hD0t21N0E1vWOLO3Y805H1g2O8K2OcMgTbnKEdzhWIRTVgruvlGUcWdGV bXFkIzKlsYRVnZiV
Zse2iLzuZ8YBnlDeBvr448iNYKBwvBRnnUUZnqhVcCsai/LBi448J+XN6Tnn bjXWLuzfxI07im/j
a1WQwbbzFKBUc8emaK1R2FKvKDVaoeGdbHCIE/JzepDZZV9ZtvNeQHuwOL8I 7+6iH5ZKUSoLy9eV
XI0xJ3PJ6gkx2DrohHGnlMX4rRPPGrMoKOtmR/x2R4wo3RMFzhJSPO4sJhWN XJRbHOFdUthCwuEq
ehPmd8iRvsNXJHKT4nAvhaa/gsS+xbFeCo9KYQeEdcdCHAilyoTjGirOcuFY IaXHpJSetPgxDgc4
KTruG+g8NOBhQUorPql4SJxj1q2OtOqvbGRy9x5mvdkRnqibkRDe5ghP+qrF fwbE6U9qnPLXk+/8
h5Of0KAn7bDzpB2ue9ION3rSDzd4LNb0E/nAhc/TU7vxFmYGZqiwtbStG7cD rTqNzGjJvh12wIhD
ONbNAtgNAWYMMPOSqWOwHsbYXt0OR6mtBfhD4q60lagYSSY5M2IP0Tg8T16K hGP6YqRvo91kpBwV
M0BP0GSn2RjknLQdMwMUrXYir1/4GjOGcMtxAj1AD5/kqRuBDTOJuZRCMdLM FG1gK9iukZeZ8Vaf
kTsUI3coRjIc0+cIPGE/BKxE+poW8jrEujFCQXNTQSMrQw5buYqVr9z1M5iJ 6d35YEzra7abTC0f
7D1gN5vB8Y4IGC3n8KTduxMzDI5vJUbrOcTau95uA+N2YrSfwwkbbtabev+9 zO6mGQZksBuMtzGJ
zaAItpeCd+SbSH5Hnbw/isCMgrcgMSxqe9ooepy+9TjNlzyMYRi4wxjl2M0h 04yyl0OfWX2VWV2a
DUizujSL1B52UiuMxjRTM45wXqSv3XZoqlgkd8z1F74Mf9tRVnf6/NkR1X2L a16679eMt69VXOOr
i8tXN00kr6+b5opr9xrNuGstu+9Ybdd0642PPoSkUL1F8xrVG838KNeIad1b QqY22L9Ns4PnAozx
sjMmpDDZV0FcrrP9SMAxZhwnf24acPgQ6nVM/Xwzywd6d2APYkRFKEg9qSRV dLuNXFYdl/1zzG73
EnPI7rBOVMyAdHxHnWMxqI5JVmM67F5ld7oDpf/qKv9cU7c3CM2TIgb9fBiB 4emfTqaoWJ7TPmSM
t4Gd9Qt+l0ztgkhtNOqla13amHSWZobaaChtan2bsGI4S+jGlCdzlu2d9bYn Na7pbJA3sLzPDiCJ
aBQaNklQnl9kla6HYUstkWbPV4D7uleTJYGZ65QObbwZ2UFZUGtKwUPIOA2F oxptYj0fpB1Uq5ho
S1N6hoVocsG+qN1Uoa3Gt8YpN/ZWf8G2GdNqNOv8G6GT5PUbofuyNuuG+s26 Ud2sm8RMOu3NfCa4
fwTEfeIKb589qRkza+2zd63aZ964L2jG7Fr3g3etuh/QuAA7kdcu/J5mzNGH vkcDKEgaOc+rFafD
KX3AOd0j3WhetMABmvhWO0QLpBtnmHG3q0NZ0fn9JGLiBt0a4fZf0c6FsKu1 +3HEZLZ+LoL/yZJx
Dx+FetkFawsVHsVRnR2NwJtzswmbQTLYe5sdNRbr5ZjaBrvZOosCcEyR8y47 Rjzdx8P+fTc4OE40
2Z1m02J7/4eYvd641wv8bHvfnXbXuTAOwd1m2Gza3pfGjrwPg46G+Q61N1rn KpQPsoQUcF4P5SAk
dzd9hBxwsyU2dqj3ud5d9mZVTV+lpttbKLcRyu02e6txv5JW4zwnh58h1R3y NLA75K796/Xd1XiP
WwhBE/01ZvySqIbIYF8bdlGWI6qDiPHLghadXlREWMddn26VcDnezqeqWQ9U JuhXh3exrXexSCxA
5WAGcPDpwOI9gEQt8uzvw4oFxvVI3zq7ibPHdc7vRUkExsOkHuX8s7JSYsoy rLNbxbgOrrDObhdw
63iQO+00Ljgf49tdvMpC/DyzQzds3+0eOXivB5PoCgHeFXBzeXfdWY4XRcR6 sFJZqMBB0I5SFYga
mESP8qmaYS0fQngP8btTCGfshyv18pheIfPv85s/m6L8X8MHnE0N0oMXqGg0 2hWx2+6Dr97HMMdH
Kl0MPehX3BNkkE8ykLbX07o0hU7kwxdu1ceDAY3lI3bIDIrlDuIUHAIZoT2G 6TUZ70ccaKEtdtRs
wVY5i0aLKo6wcR0N0WxBaZF8mDgBpJ9uLxwEcRc0PsD9hynyfBT3wEd9uNle Zzaj0XdiD0XGA9o6
YYJ6o9k8HuqAYIMi6I2SZEdfU9oMYW070P8iZ7n8rM7PcWYwScIoN3sFRgfF 6CCJt3FxBGJhfbsi
32V9sMIdGh/ywozpcmZXGh/mLPmbiQh61m7rMdxUzAi18Y94Q2ZYV6B3t32V 9asVOQZFEbOvltpm
rCtg77Uer4DQ7OtoOSK85OZ1cYSOyiP0R/nKLUa6tzQbH+P0INVdlOpOLut7 sUAfZ5WH2PlLl4xP
EBE3PkmX4XwYe/H9XAkFGaVlAnn+fy5htZuFKoEobmqPEqC0ijawt8OO3dd0 6ZLdel9EoxpoFxqL
dPLukLxOLK0c1Wyvvy/Kmd2CyRU3SF6P8QSrLDyk0e8Vfo1VqHARB/DDOH8s iviCWCqqv3X2Fmra
gaNBeXzYbnxKQHr8wV7ZGbWeROtDJw+jAmgX7hLZWC+zscd4yjnp77evMn4d Dp9yHNpXG7/BjKcp
QtrBnfZe49MuFuf566LGZwj3beePaM8QLR/OgvREp9HDWXeeqvZa2zA+yypT Gje9z3jWpa8nvvE5
Gms2a+D09tv7SU53EBnKAdIxg0TeZHweoi+4ooPGb0LUhI4RMaMLD4Xos7zf kim8xfgimU3bh0w9
2ddq32r8NscI/TY0bLqBvcX6Eh0rwL1LRxNHJeoP24kF6uy8F39N935bGbU1 0cSC3llEk2eR/h7N
eA6Qfin8ZXpCxpJQtT3PVc7Sg0jE+B1WWURcm97DUGFCQr26DRUG0Vma+wkU mJQEaFCMJOM6ie7A
IUqKgpG+HrQLOQgV97tixr1X2h2OTijS14uW5gxHCTpKut1lfAVJo2SjCLuQ z6/yMYQ3GBuAX3Dx
Rjz/VervR8TuwfN+RSYAhnSqV6Q9yit1s/F7XKCcrP5eN37fd0JaL09I/Z9l kn4v7o3Pc4onLOxP
WJOUiIRFfAmLOhKesGZ/wlocEU9YzE1Yqy9hbY4OT1i7l7AOL2EP2518vz7v ns55B/qFTo1GtAED
9eirEP95IGy8iHJdkL/55hsv6iQL8X6NDi5f5/Uv7zktYpuh5BII2tuFfbvt Vjw/dCLmb/i2YgdC
/aZ/a+Jw9S1WqcjQe40/cG5rlQU6Ym7m8URpFfor7hPitgAd5jU6zCdwmB/B mcP3HIibh25821k9
/iT9tHe2RqSbsXYvMT+TNOnZqjeCwwco3P4CWO0PM8zpD53nKizFd0CPXcE/ FrW+W7G+V0EyqA3J
rRXT6DMhTPll0usSH5/6NLi0/bI+O+hQnwc6F/hqdYt4eF1ujNI5TL9we8D6 I7r/0PkpiOehVypT
gdZmHAzowIj1DaGpbcPZC0rBs2YINxQcXwI4foXO63R7eUbv3YB5B8GL0qEV 8ziPs4PufBClXygE
yDwlRh/r5V8wCjCUhXmJziiX0HNntHCt6cyrLMya/F9VZtnUYeZ8Ad//vXvx PW027JPwL9/L79wn
cgCF0UQpV0jEMxnm++q9/7vOLJ5M5gu5fKpQGmN1X3Nmdd9qJr2R0Uwpzb+J X/JpeaTz3XpzME5f
8qZf+tLLCljO/dq3Gaevpxf9GgOINukIBPB9vR8mxS/+FeZgLldaxSzlcggw 7+fSiwDSGVL1v2ag
flg8kx7KjtALAOr5AyP5hiJYOpwWbWB/sjSsjDqcXs0r5gqlhrNKj9D34xtN rZGEUsZfL1DPLqeL
6YFMilYoVV49jcF0KpOUX9qnRYTvXF2OZSH5OHytoJvOZtLZFNY1g8GQsRwq iDxk87mif0A8+dbR
Yp1j760NfruFeDGlMunvAvwDc0U+0VWz4KuYyKTiBUnnZGWYgwnJyTip8I1N pgaLpbHMqvnJF0LU
qSKyVctHzOEU/4uR+ogEhTSoL51Y9a4J3ysm+AJhv6KsUqj6XFb+WUsik07c wXxWxSso4oBFWgme
/KxcKUzYmXqCbzAPIxViZ+Tk1WWYg1mvmt2kiFdb8DdamD75MBiQZgqpZCF+ mBVSg4VUcZj5TcBe
3QZRobsWpkciQ8l0MZ+Jj/F5IVpny5oeNZjl28UUl0HnIhbGmSgs0cwFM8ez 7KTfmTC9mMNbUdOx
kE1nk6kjzGsMbvV4VYZMIwNDKTHCeamHmXVNubuXPfmTgM4ODpFUbFlI/Ts4 l6VJU8nLkGUtZeU1
x9WoEbJEPp0ojRZSzP/SED4eEYymmPfaEHpbSJaM0vYsMlgtxBMlvle9d4c4 88WyjMQL9KqQIac7
ZWlVKRhZBL7tQC8aMRU5KjGBFkCbMoNbSY42wXCa/5FS3atI/G8gGUpluSCT Q13H5aoz3+tIisO5
w/lcfjRPDETk1gXLFnKHk+kybhkF4T8Lbh2D3mCCux5vSdlEppCPY+bum0xy 4rUlq95jUvf6kqzb
TDO5rNtzyDW6HRUJsnFYrpFYbQlMnogRev+OmaUgRPZoe3ITda9DydEi8QaM ve7RGanLWSg7JnKL
gJO5bGaM+W+Gplh8060O5xaaRYGjEIZoPfnNVNB046KB0HD3nWjgdArgLSkx WmT+97OY3g3ae0PL
oJchM+tN2QvSTKCqcqz+Vq/c1lG90p7bunxm/Zn3kWLCoujYaD7Jx7mpotLk lW46vSDHkzowlo2P
kIO6nLu7z3nPjPt6GdO3s+QbZuIltpu/N6lYipfSieIeJt/BNDN7kl7O0kx/ 5Mq/zc/YEyF2US9p
7H30x67/C1BLAQIUABQAAgAIAJJqSDNnBY2ueQEAAHkCAAAZAAAAAAAAAAAA IAC0gQAAAABQcnVl
YmFCdWNsZU9uRHJhd0NlbGwueHBqUEsBAhQAFAACAAgAkmpIM0h1YmPZAAAA UAEAACAAAAAAAAAA
AAAgALSBsAEAAFNvdXJjZS9QcnVlYmFCdWNsZU9uRHJhd0NlbGwucHJnUEsB AhQAFAACAAgAGWtI
M8rvYomsAQAAjAQAABAAAAAAAAAAAAAgALSBxwIAAFNvdXJjZS9Gb3JtMS5w cmdQSwECFAAUAAIA
CAAZa0gz2zNs/lcBAACRAwAAEAAAAAAAAAAAACAAtIGhBAAAU291cmNlL0Zv cm0xLnhmbVBLAQIU
ABQAAgAIACBaSDOEhiFTHB0AANdJAAAOAAAAAAAAAAAAIAC0gSYGAABPYmov QnJ3Q29sLm9ialBL
BQYAAAAABQAFAE0BAABuIwAAAAA=
------=_NextPart_000_001A_01C5CC0C.091D82D0--
Attached files PruebaBucleOnDrawCell.zip (9.2 KB)Â
Alinear celda del Browse
Xevi,
perdona el retraso en contestar.
If( Val( cText ) < 2, oSender:SetAlignment( taRIGHT, .T. ), oSender:SetAlignment( taLEFT, .T. ) )
No me funciona... el mismo bucle repetitivo!!!
Aunque le saque la lVScroll, siempre hace un repintado del Browse... se nota como pinta TODAS las celdas.
Es .F., y no .T. lo que tienes que pasar como segundo parámetro.
--
Un saludo,
José F. Giménez
--
perdona el retraso en contestar.
If( Val( cText ) < 2, oSender:SetAlignment( taRIGHT, .T. ), oSender:SetAlignment( taLEFT, .T. ) )
No me funciona... el mismo bucle repetitivo!!!
Aunque le saque la lVScroll, siempre hace un repintado del Browse... se nota como pinta TODAS las celdas.
Es .F., y no .T. lo que tienes que pasar como segundo parámetro.
--
Un saludo,
José F. Giménez
--
Alinear celda del Browse
Jose,
Es fin de semana, y primero lo primero...
Pues resuelto PERFECTISIMAMENTE con el segundo parámetro a .F.
Gracias.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje news:[email=434974fe@ozsrvnegro.ozlan.local...]434974fe@ozsrvnegro.ozlan.local...[/email]
Xevi,
perdona el retraso en contestar.
If( Val( cText ) < 2, oSender:SetAlignment( taRIGHT, .T. ), oSender:SetAlignment( taLEFT, .T. ) )
No me funciona... el mismo bucle repetitivo!!!
Aunque le saque la lVScroll, siempre hace un repintado del Browse... se nota como pinta TODAS las celdas.
Es .F., y no .T. lo que tienes que pasar como segundo parámetro.
--
Un saludo,
José F. Giménez
--
Es fin de semana, y primero lo primero...
Pues resuelto PERFECTISIMAMENTE con el segundo parámetro a .F.
Gracias.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje news:[email=434974fe@ozsrvnegro.ozlan.local...]434974fe@ozsrvnegro.ozlan.local...[/email]
Xevi,
perdona el retraso en contestar.
If( Val( cText ) < 2, oSender:SetAlignment( taRIGHT, .T. ), oSender:SetAlignment( taLEFT, .T. ) )
No me funciona... el mismo bucle repetitivo!!!
Aunque le saque la lVScroll, siempre hace un repintado del Browse... se nota como pinta TODAS las celdas.
Es .F., y no .T. lo que tienes que pasar como segundo parámetro.
--
Un saludo,
José F. Giménez
--
Alinear celda del Browse
Jose,
En versión Xailer Beta...
***************************** Registro de errores *****************************
Fecha: 10/10/2005
Hora: 10:19:02
Memoria libre: 605108
Area actual: 3
------------------------- Información del compilador --------------------------
Versión Xailer: Xailer 0.99.5 Pre-release 5a
Compilador: xHarbour build 0.99.51 Intl. (SimpLex) PCode Version: 7
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Home Edition 5.01.2600 Service Pack 2
----------------------- Información detallada del error -----------------------
Subsistema: BASE
Código de error: 1004
Estado: .F.
Descripción: Scope Violation <PROTECTED>
Operación: SETALIGNMENT
Argumentos:
Fichero:
Código error SO: 0
Pila de llamadas:
SETALIGNMENT (0)
TFRMKITSCITROEN:BROWSE2COLUMN1DRAWCELL (337)
TBRWCOLUMN:ONDRAWCELL (0)
TBRWCOLUMN:PAINTDATA (68)
TARRAYBROWSE:WMPAINT (130)
PROCESSMESSAGES (0)
TAPPLICATION:_LBUSY (292)
TFRMKITSCITROEN:BUTTON1CLICK (437)
TBUTTON:ONCLICK (0)
TBUTTON:CLICK (101)
(b)XCONTROL (136)
TBUTTON:COMMAND (0)
TFRMKITSCITROEN:WMCOMMAND (238)
RUNFORM (0)
TAPPLICATION:RUN (189)
MAIN (24)
------------------ Información detallada de áreas de trabajo ------------------
Area: 1
Alias: ACITROENKITSCITROEN
Registro: 133951
Filtro:
Relación:
Orden del índice: 1
Clave activa: 1
Area: 2
Alias: TCITROENKITSCITROEN
Registro: 22110
Filtro:
Relación:
Orden del índice: 1
Clave activa: 1
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje news:[email=434974fe@ozsrvnegro.ozlan.local...]434974fe@ozsrvnegro.ozlan.local...[/email]
Xevi,
perdona el retraso en contestar.
If( Val( cText ) < 2, oSender:SetAlignment( taRIGHT, .T. ), oSender:SetAlignment( taLEFT, .T. ) )
No me funciona... el mismo bucle repetitivo!!!
Aunque le saque la lVScroll, siempre hace un repintado del Browse... se nota como pinta TODAS las celdas.
Es .F., y no .T. lo que tienes que pasar como segundo parámetro.
--
Un saludo,
José F. Giménez
--
En versión Xailer Beta...
***************************** Registro de errores *****************************
Fecha: 10/10/2005
Hora: 10:19:02
Memoria libre: 605108
Area actual: 3
------------------------- Información del compilador --------------------------
Versión Xailer: Xailer 0.99.5 Pre-release 5a
Compilador: xHarbour build 0.99.51 Intl. (SimpLex) PCode Version: 7
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Home Edition 5.01.2600 Service Pack 2
----------------------- Información detallada del error -----------------------
Subsistema: BASE
Código de error: 1004
Estado: .F.
Descripción: Scope Violation <PROTECTED>
Operación: SETALIGNMENT
Argumentos:
Fichero:
Código error SO: 0
Pila de llamadas:
SETALIGNMENT (0)
TFRMKITSCITROEN:BROWSE2COLUMN1DRAWCELL (337)
TBRWCOLUMN:ONDRAWCELL (0)
TBRWCOLUMN:PAINTDATA (68)
TARRAYBROWSE:WMPAINT (130)
PROCESSMESSAGES (0)
TAPPLICATION:_LBUSY (292)
TFRMKITSCITROEN:BUTTON1CLICK (437)
TBUTTON:ONCLICK (0)
TBUTTON:CLICK (101)
(b)XCONTROL (136)
TBUTTON:COMMAND (0)
TFRMKITSCITROEN:WMCOMMAND (238)
RUNFORM (0)
TAPPLICATION:RUN (189)
MAIN (24)
------------------ Información detallada de áreas de trabajo ------------------
Area: 1
Alias: ACITROENKITSCITROEN
Registro: 133951
Filtro:
Relación:
Orden del índice: 1
Clave activa: 1
Area: 2
Alias: TCITROENKITSCITROEN
Registro: 22110
Filtro:
Relación:
Orden del índice: 1
Clave activa: 1
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje news:[email=434974fe@ozsrvnegro.ozlan.local...]434974fe@ozsrvnegro.ozlan.local...[/email]
Xevi,
perdona el retraso en contestar.
If( Val( cText ) < 2, oSender:SetAlignment( taRIGHT, .T. ), oSender:SetAlignment( taLEFT, .T. ) )
No me funciona... el mismo bucle repetitivo!!!
Aunque le saque la lVScroll, siempre hace un repintado del Browse... se nota como pinta TODAS las celdas.
Es .F., y no .T. lo que tienes que pasar como segundo parámetro.
--
Un saludo,
José F. Giménez
--
Alinear celda del Browse
Xevi,
tienes que usar el .obj que te envié. Estará incluido en la próxima versión.
--
Un saludo,
José F. Giménez
tienes que usar el .obj que te envié. Estará incluido en la próxima versión.
--
Un saludo,
José F. Giménez
Alinear celda del Browse
Jose,
Si lo tengo incluido!!!
Es el mismo proyecto, compilado en mi portatil o en el del trabajo, (donde
tengo una Demo)
Incluso he reconstruido el proyecto, en el de la Demo, pero nada, lo
mesmo...
Lo he vuelto a probar en el portatil, en la registrada, y perfecto !!!
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:434a2d6e$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Xevi,
>
> tienes que usar el .obj que te envié. Estará incluido en la próxima
> versión.
>
>
> --
> Un saludo,
>
> José F. Giménez
>
Si lo tengo incluido!!!
Es el mismo proyecto, compilado en mi portatil o en el del trabajo, (donde
tengo una Demo)
Incluso he reconstruido el proyecto, en el de la Demo, pero nada, lo
mesmo...
Lo he vuelto a probar en el portatil, en la registrada, y perfecto !!!
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:434a2d6e$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Xevi,
>
> tienes que usar el .obj que te envié. Estará incluido en la próxima
> versión.
>
>
> --
> Un saludo,
>
> José F. Giménez
>
Alinear celda del Browse
Xevi,
> Si lo tengo incluido!!!
> Es el mismo proyecto, compilado en mi portatil o en el del trabajo, (donde
> tengo una Demo)
>
> Incluso he reconstruido el proyecto, en el de la Demo, pero nada, lo
> mesmo...
> Lo he vuelto a probar en el portatil, en la registrada, y perfecto !!!
Es muy raro. Por favor, publica el proyecto, marcando la casilla "incluir
binarios" y me lo envias para comprobarlo.
--
Un saludo,
José F. Giménez
> Si lo tengo incluido!!!
> Es el mismo proyecto, compilado en mi portatil o en el del trabajo, (donde
> tengo una Demo)
>
> Incluso he reconstruido el proyecto, en el de la Demo, pero nada, lo
> mesmo...
> Lo he vuelto a probar en el portatil, en la registrada, y perfecto !!!
Es muy raro. Por favor, publica el proyecto, marcando la casilla "incluir
binarios" y me lo envias para comprobarlo.
--
Un saludo,
José F. Giménez
Alinear celda del Browse
Jose...
Me tenía preocupado!!!
Me he limitado a crear proyectos nuevos, y funcionaba correctamente... pero
aunque forzara a reconstruir mi proyecto una y otra vez, incluso eliminando
los objs, SIEMPRE el mismo error.
Lo que he hecho es quitar de mi proyecto un par de ficheros, reconstruir el
proyecto,... y voalá!!! funciona perfecto... le he vuelto a añadir los
archivos que he sacado del proyecto... y sigue funcionando correctamente...
Buuuuffff!!!!
Un dia buscando el error, y no se todavía a que era debido.
¿Podría ser debido a que al ser el último archivo que se añade a la cola del
proyecto, no lo tiene en cuenta???
No se, pero comento esto porque no era yo quien lo estaba haciendo mal,
SEGURO !!!
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:434a3106$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Xevi,
>
>> Si lo tengo incluido!!!
>> Es el mismo proyecto, compilado en mi portatil o en el del trabajo,
>> (donde tengo una Demo)
>>
>> Incluso he reconstruido el proyecto, en el de la Demo, pero nada, lo
>> mesmo...
>> Lo he vuelto a probar en el portatil, en la registrada, y perfecto !!!
>
> Es muy raro. Por favor, publica el proyecto, marcando la casilla "incluir
> binarios" y me lo envias para comprobarlo.
>
> --
> Un saludo,
>
> José F. Giménez
>
Me tenía preocupado!!!
Me he limitado a crear proyectos nuevos, y funcionaba correctamente... pero
aunque forzara a reconstruir mi proyecto una y otra vez, incluso eliminando
los objs, SIEMPRE el mismo error.
Lo que he hecho es quitar de mi proyecto un par de ficheros, reconstruir el
proyecto,... y voalá!!! funciona perfecto... le he vuelto a añadir los
archivos que he sacado del proyecto... y sigue funcionando correctamente...
Buuuuffff!!!!
Un dia buscando el error, y no se todavía a que era debido.
¿Podría ser debido a que al ser el último archivo que se añade a la cola del
proyecto, no lo tiene en cuenta???
No se, pero comento esto porque no era yo quien lo estaba haciendo mal,
SEGURO !!!
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:434a3106$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Xevi,
>
>> Si lo tengo incluido!!!
>> Es el mismo proyecto, compilado en mi portatil o en el del trabajo,
>> (donde tengo una Demo)
>>
>> Incluso he reconstruido el proyecto, en el de la Demo, pero nada, lo
>> mesmo...
>> Lo he vuelto a probar en el portatil, en la registrada, y perfecto !!!
>
> Es muy raro. Por favor, publica el proyecto, marcando la casilla "incluir
> binarios" y me lo envias para comprobarlo.
>
> --
> Un saludo,
>
> José F. Giménez
>