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.

Browses elásticos

Foro público de Xailer en español
Responder
Fredy
Mensajes: 199
Registrado: Mié Mar 29, 2006 1:28 am

Browses elásticos

Mensaje por Fredy »

Hola,
He publicado en xailer.info un artí­culo que seguro que os gusta a más de
uno :)
1 Saludico,
Fredy
Arriba
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9252
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:
Contactar ignacio

Browses elásticos

Mensaje por ignacio »

Fredy,
Muchas gracias.
Un saludo
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
http://www.xailer.com/forum
http://www.xailer.com/dokuwiki
"Fredy" escribió en el mensaje de
noticias:[email=b893818512808cdad37b736fa09@news.xailer.com...]b893818512808cdad37b736fa09@news.xailer.com...[/email]
Hola,
He publicado en xailer.info un artí­culo que seguro que os gusta a más de
uno :)
1 Saludico,
Fredy
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Arriba
Avatar de Usuario
Carlos Ortiz
Mensajes: 872
Registrado: Mié Jul 01, 2009 5:44 pm
Ubicación: Argentina - Córdoba
Contactar:
Contactar Carlos Ortiz

Browses elásticos

Mensaje por Carlos Ortiz »

Gracias, está buenísimo.
Carlos Ortiz
"Fredy" <alfredo@sanzperez.com> escribió en el mensaje
news:[email=b893818512808cdad37b736fa09@news.xailer.com...]b893818512808cdad37b736fa09@news.xailer.com...[/email]
>
> Hola,
>
> He publicado en xailer.info un artículo que seguro que os gusta a más de
> uno :)
>
>
> 1 Saludico,
> Fredy
>
>
Arriba
Bingen Ugaldebere
Mensajes: 1310
Registrado: Mié Sep 26, 2007 7:12 pm

Browses elásticos

Mensaje por Bingen Ugaldebere »

Muy bueno Fredy, nosotros hicimos algo parecido añadiendo 2 nuevos
métodos a la clase Browse, con lo que funcionan para todos los tipos de
browse, e incluso añadimos 2 pulsaciones sobre el browse para llamar a
estos métodos.
Class tBrowse From xBrowse
METHOD OnKeyDown( nKey, nFlags)
Method AdjustCols()
Method StretchCols()
EndClass
Method OnKeyDown(nKey, nFlags) Class tBrowse
Do Case
Case nKey=65 .And. lGetKeyState( VK_CONTROL ) //Teclas Ctrl+A
::AdjustCols()
Case nKey=83 .And. lGetKeyState( VK_CONTROL ) //Teclas Ctrl+S
::StretchCols()
End
RETURN Super:OnKeyDown( nKey, nFlags )
//Autoajustar anchura columnas a su contenido
Method AdjustCols( oSender ) Class tBrowse
aEval( ::aCols,{|aCol| aCol:AdjustWidth() })
Return Nil
//Autoajustar anchura columnas al form de forma proporcional
Method StretchCols( oSender ) Class tBrowse
Local nBrowseWidthPercent:=0
aEval(::aCols,{|aCol| nBrowseWidthPercent+=aCol:nWidth+3 })
nBrowseWidthPercent:=(::nWidth-nBrowseWidthPercent)/::nWidth
If Abs(nBrowseWidthPercent)>0.01
aEval(::aCols,{|aCol|
aCol:nWidth:=aCol:nWidth*(1/(1-nBrowseWidthPercent)) })
Endif
Return Nil
El 10/03/2011 12:42, Fredy escribió:
>
> Hola,
>
> He publicado en xailer.info un artí­culo que seguro que os gusta a más de
> uno :)
>
>
> 1 Saludico,
> Fredy
>
>
Arriba
Responder

Volver a “Spanish”