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.

Resizing TBrowse columns

Xailer professional forum in English
Responder
Timm
Mensajes: 136
Registrado: Lun Jun 21, 2010 11:01 am

Resizing TBrowse columns

Mensaje por Timm »

Hi!
I use a TBrowse control wich contains 100 columns. When I resize the columns
with AEval( ::oBrw:aCols, {|x| x:nWidth := 32 } ) it takes time.
Is there a way to make it faster?
Best regards, Timm.
Roberto
Mensajes: 177
Registrado: Mar Oct 16, 2007 11:53 pm

Resizing TBrowse columns

Mensaje por Roberto »

Timm wrote on Mon, 01 October 2012 17:59Hi!
I use a TBrowse control wich contains 100 columns. When I resize the columns
with AEval( ::oBrw:aCols, {|x| x:nWidth := 32 } ) it takes time.
Is there a way to make it faster?
Best regards, Timm.
try
with object ::oBrw
:lRedraw := .F.
aEval(:aCols, { |x| nWidth := 32 }
:lRedraw := .T.
end
the browse will be painted just one time
Timm
Mensajes: 136
Registrado: Lun Jun 21, 2010 11:01 am

Resizing TBrowse columns

Mensaje por Timm »

Hi Roberto,
works great, many thanks!
Best regards, Timm.
"Roberto" <roberto[at]top2[dot]com[dot]br> schrieb im Newsbeitrag
news:5069d51d$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Timm wrote on Mon, 01 October 2012 17:59
>> Hi!
>>
>> I use a TBrowse control wich contains 100 columns. When
>> I resize the columns
>> with AEval( ::oBrw:aCols, {|x| x:nWidth := 32 } ) it
>> takes time.
>> Is there a way to make it faster?
>>
>> Best regards, Timm.
>
>
> try
>
> with object ::oBrw
> :lRedraw := .F.
> aEval(:aCols, { |x| nWidth := 32 }
> :lRedraw := .T.
> end
>
> the browse will be painted just one time
Responder