Page 1 of 1
Bug on Tfolderex
Posted: Wed Sep 18, 2019 8:17 am
by byte-one
After oFld:enabletab(nOtion) the controls inside this tab becomes not active.
Re: Bug on Tfolderex
Posted: Wed Sep 18, 2019 11:44 am
by Silvio.Falconi
yes oldest error never corrected , asked also I many days ago
Re: Bug on Tfolderex
Posted: Wed Sep 18, 2019 2:31 pm
by cnavarro
byte-one wrote:After oFld:enabletab(nOtion) the controls inside this tab becomes not active.
For me it's OK
Please put a example for test your problem
Re: Bug on Tfolderex
Posted: Thu Sep 19, 2019 3:05 pm
by James Bott
Günther,
It would help if you would put your software versions in your automatic signature line.
Re: Bug on Tfolderex
Posted: Thu Sep 19, 2019 7:55 pm
by byte-one
James, FWH 1812
Re: Bug on Tfolderex
Posted: Thu Sep 19, 2019 9:06 pm
by cnavarro
Dear Günther
Do not have a small example to check your problem?
Re: Bug on Tfolderex
Posted: Fri Sep 20, 2019 10:21 am
by byte-one
Cristobal, simple do a oFld:disabletab(nOtion) and later a oFld:enabletab(nOtion). Then the tab is enabled and can clicked but all the controls inside this tab are inactive.
Re: Bug on Tfolderex
Posted: Fri Sep 20, 2019 10:26 am
by cnavarro
Günther, I tested using valid of a get in first folder and run ok
Code: Select all
Function ActDesactDlgs( lEnable )
local x
DEFAULT lEnable := .F.
For x = 2 to Len( oFolder:aDialogs )
if lEnable
oFolder:EnableTab( x )
else
oFolder:DisableTab( x )
endif
Next x
Return nil
Re: Bug on Tfolderex
Posted: Fri Sep 20, 2019 11:23 am
by byte-one
Please test this code. Except the first tab in all others the controls inside all are inactive!
Code: Select all
Function ActDesactDlgs( lEnable )
local x
For x = 2 to Len( oFolder:aDialogs )
oFolder:DisableTab( x )
oFolder:EnableTab( x )
Next x
Return nil
Re: Bug on Tfolderex
Posted: Wed Oct 02, 2019 12:55 pm
by cnavarro
Sorry Günther
This run also OK for me