Re: Почему не считываются значения, введенные из dcl-файла?

> Александр Ривилис
Большое спасибо за желание помочь, но дайте чуть-чуть самому подумать.
И ещё раз спасибо.

Re: Почему не считываются значения, введенные из dcl-файла?

> Sanek
Кстати, в твоем институте всегда были очень толковые специалисты по lisp (еще лет десять назад). Перевелись? wink

Re: Почему не считываются значения, введенные из dcl-файла?

> Sanek

proba :dialog { label="Change";
key="titl";
:edit_box {label="Numer";
key="nam";
edit_limit=2;
edit_width=2;
value="1";}
ok_only;
}
(setq namber (load_dialog "d:\\proba.dcl"))
(new_dialog "proba" namber)
(set_tile "nam" "2")
(action_tile "accept"
"(progn (setq NON (get_tile \"nam\"))(done_dialog))")
(start_dialog)
(unload_dialog namber)
Только что проверил, ввел в командную строку акада
!NON
Получил
Command:
Command: !NON "2"

Re: Почему не считываются значения, введенные из dcl-файла?

> Евгений Елпанов
Да у меня тоже уже вышло.
Александр Ривилис отчасти был прав, кнопка была, но только ключ был не "accept", а "b1".

Re: Почему не считываются значения, введенные из dcl-файла?

> Александр Ривилис
То когда было!
Лет 5-10 назад, а люди старше меня на лет 20 не очень охотно опытом делятся, особенно в том что на прямую не касается специальности.
Отправляют читать ПУЭ :).

Re: Почему не считываются значения, введенные из dcl-файла?

> Sanek
А как ты поменял ключ на кнопку Ok?

Re: Почему не считываются значения, введенные из dcl-файла?

> Евгений Елпанов
Я наверное неправильно выразился у меня было
code
:ok_button{label="Yes";key="b1";}
/code
А обращался я ж к key="accept"