TExplorerBar and TOptionList

[Ingo]

Hello,
is there a documentation about the classes TExplorerBar and TOptionList
available?
How can I expand or collaps the OptionList at runtime?
Regards
Ingo

[ignacio]

Ingo,
The documentation of those classes is almost finish in Spanish. But it
English there are some more modules not translated yet. BTW the one you need
it is. I attach it with this message.
The property to expand or collapse OptionItems is lExpanded.
Regards,
"Ingo" <ingo.jh@web.de> escribió en el mensaje
news:[email=435c9fda@ozsrvnegro.ozlan.local...]435c9fda@ozsrvnegro.ozlan.local...[/email]
> Hello,
>
> is there a documentation about the classes TExplorerBar and TOptionList
> available?
>
> How can I expand or collaps the OptionList at runtime?
>
> Regards
>
> Ingo
>
>


Attached files OptionItem.chm (27.7 KB)Â

[jfgimenez]

Ingo,
> is there a documentation about the classes TExplorerBar and TOptionList
> available?
Not yet, sorry. We'll try to do it ASAP.
> How can I expand or collaps the OptionList at runtime?
There are 2 methods (Expand() and Collapse()) in TOptionItem, but the item
must have nType = bsBUTTON, and lCollapsable = .T.. Then, you can do:
::oOptionList1:aItems[1]:Expand() or
::oOptionList1:aItems[1]:Collapse()
--
Regards,
Jose F. Gimenez

[jfgimenez]

Ingo,
>> is there a documentation about the classes TExplorerBar and TOptionList
>> available?
>
> Not yet, sorry. We'll try to do it ASAP.
I was too fast replying
--
Regards,
Jose F. Gimenez

[Ingo]

Sorry,
I can't download "optionitem.chm".
Regards
Ingo
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> schrieb im Newsbeitrag
news:435ca5b2$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Ingo,
>
> The documentation of those classes is almost finish in Spanish. But it
> English there are some more modules not translated yet. BTW the one you
> need it is. I attach it with this message.
>
> The property to expand or collapse OptionItems is lExpanded.
>
> Regards,
>
>
> "Ingo" <ingo.jh@web.de> escribió en el mensaje
> news:[email=435c9fda@ozsrvnegro.ozlan.local...]435c9fda@ozsrvnegro.ozlan.local...[/email]
>> Hello,
>>
>> is there a documentation about the classes TExplorerBar and TOptionList
>> available?
>>
>> How can I expand or collaps the OptionList at runtime?
>>
>> Regards
>>
>> Ingo
>>
>>
>
>
>

[Ingo]

Jose,
I build a Form with 2 DbfBrowses and 1 ExplorerBar.
The ExplorerBar has 2 OptionLists each with 3 Items and one Separator.
An Optionlist for each of the browses to handle them.
If the one of the browses got the focus I want to expand the one OptionList belonging to this browse
and collaps the other one.
Is it right that I have to collaps each Item of the Optionlist itself?
I tried this (the 3rd Item is the separator):
.....
CASE oNextCtl:Handle()=::oBrowse1:Handle()
AEVAL(::oOptionList1:aItems,{|x,n|IIF(n#3,x:Expand(),)})
AEVAL(::oOptionList2:aItems,{|x,n|IIF(n#3,x:Collapse(),)})
.....
It's not working.
Has TOptionList not its own method to collapse or expand all the Items like TTreeView:ExpandAll()?
Regards
Ingo
--

[Ingo]

Ignacio,
the download is ok now I forgot to change the security options.
Thanks a lot
Ingo

[jfgimenez]

Ingo,
I build a Form with 2 DbfBrowses and 1 ExplorerBar.
The ExplorerBar has 2 OptionLists each with 3 Items and one Separator.
An Optionlist for each of the browses to handle them.
If the one of the browses got the focus I want to expand the one OptionList belonging to this browse
and collaps the other one.
Is it right that I have to collaps each Item of the Optionlist itself?
No. Collapsing an item means that every child item of it is hidden. But none of the items of the first level can be collapsed.
Perhaps what you are looking for is collapsing the explorer group, hidding the whole optionlist. You can do it so:
CASE oNextCtl == ::oBrowse1
::oExplorerBar1:aItems[1]:lExpanded := .T.
::oExplorerBar1:aItems[2]:lExpanded := .F.
...
Also, you can fully hide a group using its lVisible property.
BTW, you can compare two objects directly, using the == operator. Just like the above sentence.
--
Regards,
Jose F. Gimenez
--

[Ingo]

Jose,
many thanks. I will try it.
Regards
Ingo
"Jose F. Gimenez" <jfgimenez@wanadoo.es> schrieb im Newsbeitrag news:[email=435d01b1@ozsrvnegro.ozlan.local...]435d01b1@ozsrvnegro.ozlan.local...[/email]
Ingo,
I build a Form with 2 DbfBrowses and 1 ExplorerBar.
The ExplorerBar has 2 OptionLists each with 3 Items and one Separator.
An Optionlist for each of the browses to handle them.
If the one of the browses got the focus I want to expand the one OptionList belonging to this browse
and collaps the other one.
Is it right that I have to collaps each Item of the Optionlist itself?
No. Collapsing an item means that every child item of it is hidden. But none of the items of the first level can be collapsed.
Perhaps what you are looking for is collapsing the explorer group, hidding the whole optionlist. You can do it so:
CASE oNextCtl == ::oBrowse1
::oExplorerBar1:aItems[1]:lExpanded := .T.
::oExplorerBar1:aItems[2]:lExpanded := .F.
...
Also, you can fully hide a group using its lVisible property.
BTW, you can compare two objects directly, using the == operator. Just like the above sentence.
--
Regards,
Jose F. Gimenez
--