FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Folder check
Posts: 3022
Joined: Fri Oct 07, 2005 01:45 PM
Folder check
Posted: Fri Aug 31, 2018 10:32 PM
Consider the following:

Code (fw): Select all Collapse
DEFINE DIALOG oWdlg1 BRUSH oBrush RESOURCE "WOMAINw" OF oWnd TITLE cTitle
REDEFINE FOLDEREX oEditWork:oFld ID 356 OF oWdlg1 ;
    PROMPT "   General   ", "   Parts   ", "   Labor   ", "   Recommend   ", "   Totals   ", "   Inspect   ", "   Costing   ", "  Services  ", "   Attachments   " ;
    DIALOGS "WOGENw", "WOPARw", "WOLABw", "WORECw", "WOTOTw", "WOINSw", "WOCSTw", "WOSVCw", "WOATTw" ;
    ON CHANGE ( oEditWork:FolderCheck( ), oWdlg1:update() ) ROUND 5 TRANSPARENT


I have a "security" file with flags for access to various elements of the program. In the example above, I want to be able to show, but not activate, some of the folder prompts. That means, although the Totals Folder tab is shown, if they click on it, nothing happens.

Is there a setting in the folders control that allows me to do this ? I realize I could simply filter which tabs are shown, but those folders are all defined in the program, and eliminating some will cause a multitude of problems.

Thanks ... I'll be someone has this answer ....
Tim Stone
http://www.MasterLinkSoftware.com
http://www.autoshopwriter.com
timstone@masterlinksoftware.com
Using: FWH 23.10 with Harbour 3.2.0 / Microsoft Visual Studio Community 2022-24 32/64 bit
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Folder check
Posted: Fri Aug 31, 2018 11:23 PM

Tim
This control has a DATA aEnable ( array, len( aEnable ) equal len( aDialogs ) )
This DATA contains logicals values state of each dialog: .T. -> Enable, .F. .> Disable
oFldEx:aEnable := { .T., .F. }
In this case, second dialog is disabled

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 3022
Joined: Fri Oct 07, 2005 01:45 PM
Re: Folder check
Posted: Tue Sep 04, 2018 10:27 PM

Thank you. That works perfectly for me.

Tim Stone
http://www.MasterLinkSoftware.com
http://www.autoshopwriter.com
timstone@masterlinksoftware.com
Using: FWH 23.10 with Harbour 3.2.0 / Microsoft Visual Studio Community 2022-24 32/64 bit

Continue the discussion