Combine DCL Dialog

[Kh.mbkh]

(setq Path (getvar "dwgprefix"))
(setq DCLFile (strcat Path "FicDCL" ".dcl"))
(defun c:StartDCL ()
  (setq dcl_id (load_dialog (strcat Path "Combine.dcl")))
  (if (not (new_dialog "Main" dcl_id))
    (exit))
  (action_tile
    "cancel"  "(done_dialog)" )
  (action_tile
    "accept" "(done_dialog)" )
  (start_dialog)
  (unload_dialog dcl_id)
);defun

This function (StartDCL) aims to start a dialog named "main" , it looks like this :

In the dcl file (named "Combine.dcl") there're two other dialog definitions "hello" and "OtherDialog" :

My objectif is:

If radio button "Description On/Off" is selected : show "hello" Dialog

Otherwise : show "OtherDialog" Dialog.

N.B: the new dialog to be shown (hello or OtherDialog) should be in the same "main" dialog ; Just bellow "ok" button (NOT A CHILD DIALOG)

Thanks !

[john.uhden]

@Kh.mbkh 

If you want to show 2 out of 3 in one dialog, I think you're going to have to add 2 more definitions to your DCL file.

Right now you have plain Main.  (Yes, I talk in rhyme all the time)

You need to add, say, a Main_Hello and a Main_OK, adding to each the tiles from plain Main.

So when they toggle that magic button, you will have to close one and open another, repopulating tiles that are common to all of them.  You don't have to unload and reload as you can have many different dialogs in the same DCL file.  You just can't open multiple dialogs at the same time (I'm pretty sure).  One thing you can do which is handy sometimes is to be able to call the alert function while a dialog is open.

Don't forget to disable tiles that would not be applicable to a given situation based on the other tiles.

BTW, I have never seen the contraction "there're" before.  I wonder if it's legit.  It does save 1 character.

[Sea-Haven]

If you change your description to 2 toggle buttons a on and off then may be able to call the correct Child dcl. Once selected its deselected after running Child so both are un ticked again. 

[diagodose2009]

You can enable or disabled the "OtherDialog"

   with key = "other";

[diagodose2009]

Other method not found. 

[john.uhden]

I don't think you need two toggles. A toggle is either ON or OFF, so he
just needs to save its state as a symbol and set the tile accordingly when
switching dialogs.

[Sea-Haven]

Understand a toggle is not right button but would still have 2 buttons as per this image click button child appears. This dcl has like 12 children.

[Kh.mbkh]

'there're" Yeah there're some expressions with 'there're" .. And we do it on purpose, because we don't play by the rules we don't understand 😇

[Kh.mbkh]

NOT A CHILD DIALOG !

To have the clair concep : what I main exactly is the analogy of "Multipage" in VBA. like this:

 

it turned out that this is not possible with DCL. Thanks anyway!

[Sea-Haven · Accepted solution]

OPENDCL ???

[Kh.mbkh]

That was a good Track! I started.. but cannot show my Form; Any idea ?

(command "OPENDCL")
(defun c:ThereRe ()
(setq A (dcl_Project_Load "es.odcl" T))
(dcl_Form_Show Formulaire1)
)

The error:

[Sea-Haven]

Post at Opendcl forum I do not use Opendcl 1 more add external program that ends users have to load so stay with old fashioned DCL's.