Topic: How to change command in DCL ?

[aaa120]

I want to change command name in DCL's edit_box(Assuming the command name is "itmaxnew")
If I type string "abc" in  DCL's edit_box ,when I type "abc" and "return" ,it will run the  "itmaxnew" command.
If I type string "def" in  DCL's edit_box ,when I type "def" and "return" ,it will run the  "itmaxnew" command.
......
How  can I achieve this function？

(defun c:itmaxnew()(alert "change command"))

[Kerry]

So you want to run the same command for both cases, yes ??


What does your code look like?

[irneb]

A few questions:

• When you say "return" is this like pressing the OK button - because if there is a default button pressing return/enter might just do this.
• Or should the command run each time the edit_box's contents is edited then showing the dialog as it was again?
• What is the significance of what's typed into the edit_box? E.g. is there anything different then abc is typed in from def? Or should the command simply be run the same way no matter what's inside the edit_box?

[PKENEWELL]

(defun c:itmaxnew()(alert "change command"))

If you are attempting simply to notify the user via an alert box when a new command is entered into the Edit box, then the command must be included in the (Action_tile) statement for the Edit_Box:

Code: [Select]

;; Example - use your Edit-Box key and variable in place of "(Edit-Box Key goes here)" and "new-value".
(action_tile "(Edit-Box Key goes here)"
   "(setq new-value $value)(c:itmaxnew)"
)

Also - if your not calling (c:itmaxnew) as a user command at the command line, it does not need the "C:" prefix.

Please let me know if I am interpreting you correctly.