Mike
Maybe this snipplet can help you how to do:
- snip
(setq NxtDlg 3
Dcl_Id (load_dialog "MyDclFile")
)
(while (> NxtDlg 1)
(new_dialog "MyDclSection" Dcl_Id)
...
(action_tile "showtxtstyle" "(done_dialog 2)")
(action_tile "accept" "(DoTheAcceptStuff) (done_dialog 0)")
(action_tile "cancel" "(DoTheCancelStuff) (done_dialog 0)")
(setq NxtDlg (start_dialog))
(if (= NxtDlg 2)
(command ...)
)
(unload_dialog Dcl_Id)
)
- snip
Cheers
--
Juerg Menzi
MENZI ENGINEERING GmbH, Switzerland
http://www.menziengineering.ch