[mmax]

Как получить данные из диалога DCL.

Имеется диалог:

Код:

[Выделить все]

max: dialog{label="ввод данных";
:edit_box{label="введите первое число";key="1poitd";value="0";edit_width=6;}
:edit_box{label="введите второе число";key="2poitd";value="0";edit_width=6;}
:edit_box{label="введите третье число";key="3poitd";value="0";edit_width=6;}
ok_cancel;
}

Скажите пожалуйста, как бы мне сохранить в переменной данные введенные пользователем после нажатия кнопки оК.
Чтобы получилось нечто подобное

Код:

[Выделить все]

(setq mmax <число или строка или список введенное пользователем в edit_box>)

никак не могу въехать именно в этот вопрос, все мануалы перечитал ответы даны на все вопросы только не на этот.

Всем спасибо.

[Alex Troshkin]

Делается это в соотвествующем Lisp-файле. Приведенный ниже код вставить между new_dialog и Start_dialog

Код:

[Выделить все]

(action_tile "accept" "(progn (setq m1 (get_tile \"1poitd\") m2 (get_tile \"2poitd\") m3 (get_tile \"3poitd\") ) (done_dialog 1))")

Данные их edit_box-ов запишутся в m1, m2 и m3 в виде стрингов.

[mmax]

Попробуем

[mmax]

Плоучилось!!!!
Ура!!!

А где можно взять что нибудь типа VisualDCL
писать в блокноте -- всеравно что чертить с закрытыми глазами.

[vk]

А где можно взять что нибудь типа VisualDCL

В чистом виде АКАД не имеет такого IDE, однако, есть программки, которые делают нечто похожее. Те что попадались - платные. Кое что есть в IDE вижуалиспа, но весьма скудно - всего лишь предварительный просмотр уже написанного окна диалога.
Есть еще ObjectDCL, однако, тоже платный и для работы требует свои библиотеки.