Hallo,
gibts die Möglichkeit ein Editfeld im Dialogfeld zu aktualisieren bei geöffnetem Dialog, also z.B. wenn ich auf den Buttom NEU drücke ändert sich der Wert der Variablen wert1 wie in folgendem Beispiel und erscheint im Editfeld.
Gruß, Jürgen
********************
(defun c C ()
(setq dcl_id (load_dialog "DCL.dcl"))
(if (not (new_dialog "DCL" dcl_id))
(exit)
)
(setq wert1 "Hallo")
(setq d1 "Neu")
(set_tile "f1" wert1)
(mode_tile "f1" 2)
(action_tile "cancel" "(done_dialog 0)")
(action_tile "accept" "(done_dialog 1)")
(action_tile "v1" "(setq wert1 d1)")
(action_tile "f1" "(setq wert1 $value)")
(start_dialog)
(if (= done_dialog 0)(exit))
(unload_dialog dcl_id)
(princ)
)
*********************
DCL : dialog {
: edit_box {
key = "f1";
edit_width = 55;
edit_limit = 400;
allow_accept = true;
}
: row {
:cancel_button{
fixed_width = true;
width = 5;
label = "Abbrechen";
key = "cancel";
is_cancel = true;
}
:button{
fixed_width = true;
width = 5;
label = "Neu";
key = "v1";
}
k_button{
fixed_width = true;
width = 5;
label = "Ausführen";
key = "accept";
is_default = true;
}
}
}
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP