Re: Bloquear pliegue de una ExplorerBar

[jose.luis]

Toni,
"Toni Sales" <toni.sales@gmail.com> escribió en el mensaje
news:488ad13e$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Jose/Ignacio
> ¿Es posible bloquear que se pliegue la tExplorerBar, más bien una
> OptionList de una ExplorerBar ?
Prueba a hacer los siguiente:
En el editor de propiedades vete al evento OnItemExpand de la explorer bar.
Haces doble click y te aparece un método parecido a este:
METHOD ExplorerBar1ItemExpand( oSender, nItem ) CLASS TForm1
RETURN .T.
Si, por ejemplo, es la segunda option list la que te interesa que esté fija,
haces algo parecido a esto
METHOD ExplorerBar1ItemExpand( oSender, nItem ) CLASS TForm1
IF nItem == 2
RETURN .F.
ENDIF
RETURN NIL
Saludos,
José Luis Capel
PD: el lunes pagas tu los cafés

[Toni Sales]

Jeje
Has llegado primero que mi lectura de la respuesta. Me libro de pagar el
café y te recuerdo que mañana te toca....
Saludos y gracias por la respuesta.
Toni Sales
"José Luis Capel -" <jose.luis@capelsoft.com> escribió en el mensaje
news:488b44a8$[email=2@ozsrv2.ozlan.local...]2@ozsrv2.ozlan.local...[/email]
> Toni,
>
>
> "Toni Sales" <toni.sales@gmail.com> escribió en el mensaje
> news:488ad13e$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>> Jose/Ignacio
>> ¿Es posible bloquear que se pliegue la tExplorerBar, más bien una
>> OptionList de una ExplorerBar ?
>
> Prueba a hacer los siguiente:
>
> En el editor de propiedades vete al evento OnItemExpand de la explorer
> bar.
> Haces doble click y te aparece un método parecido a este:
>
> METHOD ExplorerBar1ItemExpand( oSender, nItem ) CLASS TForm1
>
> RETURN .T.
>
>
> Si, por ejemplo, es la segunda option list la que te interesa que esté
> fija,
> haces algo parecido a esto
>
> METHOD ExplorerBar1ItemExpand( oSender, nItem ) CLASS TForm1
>
> IF nItem == 2
> RETURN .F.
> ENDIF
> RETURN NIL
>
> Saludos,
> José Luis Capel
> PD: el lunes pagas tu los cafés
>
>
>