[prajdziswet]

делаю диалог, который состоит из одной кнопки ок:
если ставлю ok_only, нажатие на крестик(закрытие окна приводит к тому же самому что и ок) в лиспе так

Код:

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

 (action_tile "accept" "(progn (palja)(done_dialog 1)(setq done 1))")

добавляю cancel (кнопки кансел нет)..все равно done_dialog и done присваиваются 1 даже при нажатии на крестик

если ставлю ok_button то крестик не как не реагирует (даже не закрывает окно), пробывал кнопку свою -пишет ошибку нет ни ок не кансел (если только собственная кнопка)...
хочется чтобы при ок выполнялось, а при закрытии(крестик) ничего не делалось..две кнопки ок и кансел не хочется

подскажите пожалуста, что я не то делаю или как правильно обработать нажатие на ок и отмена(в данном случае крестик)

[gomer]

используй ok_cancel! Это распространенная ошибка многих академиков и инженистов. Дело в том, что когда ты жмешь крестик, выполняется кнопка по умолчанию, а так как в ok_button не заложено закрытие диалога, то тебе кажется что ничего не происходит. Собственно у тебя весь код, судя по тому, из удаленной темы, - одна сплошная ошибка

[prajdziswet]

ну код то работал,в последнем что скидывал в "удаленной" -это я по всякому извращался, и свою кнопку пытался(и возможно не совсем рабочую скидывал,уже не проверял-замучался)...а "не просходило"-все делалось,но как при нажатии кнопки ок = а меня это не совсем устраивает (в моем понимании крестик -это отмена)

[gomer]

Сообщение от prajdziswet в моем понимании крестик -это отмена

ну и кто вам доктор?

[ShaggyDoc]

Сообщение от prajdziswet в моем понимании крестик -это отмена

Не надо никаких "моих пониманий". Крестик у окна в любых программах Windows имеет единственное назначение - закрыть окно. Он не отменяет каких-то действий, выполненных в окне.

Если перед закрытием окна необходимо что-то сделать (например проверить, сохранен ли файл), то делается дополнительный обработчик события OnCloseQuery. Вот тогда можно что-то "отменить". В Lisp это обычно не делают.

Просто "закрыть окно" и "отменить" далеко не всегда одно и то же.

Что касается именованных наборов кнопок, таких как ok_only, ok_cancel, ok_button, cancel_button и прочих, то они сделаны просто для упрощения разметки. Описаны в base.dcl. Его надо посмотреть и знать, что делает та или иная кнопка или набор, т.е. какое действие (key) привязано к кнопке с таким именем. Не стоит пытаться переопределить действия стандартных кнопок (это все равно что менять местами педали в автомобиле). А вот надпись на кнопке можно сделать и свою, но не меняя смысл её действия.

[zamtmn]

>>и перед закрытием окна необходимо что-то сделать (например проверить, сохранен ли файл), то делается дополнительный обработчик события OnCloseQuery
Это какаято пропоганда vcl и "формошлепства"))

[gomer]

Сообщение от zamtmn Это какаято пропоганда vcl и "формошлепства"))

Какое-то время назад мне казалось., что "ООП-подход" к dcl выглядит круто. есть виджеты и есть их обработчики, все довольно симпатично. Но потом оказалось, что обыкновенный "винапишный" подход - гораздо проще: достаточно одной функции, аналогичной WndProc и функции запуска диалога типа DialogShow.
поэтому строчки типа

Сообщение от prajdziswet (action_tile "accept" "(progn (palja)(done_dialog 1)(setq done 1))")

у меня отсутствуют как класс, особенно (setq done 1) - это вообще идиотизм, так как результат диалога можно взять, во-первых, из start_dialog во вторых из системной переменной diastat

[prajdziswet]

gomer и ShaggyDoc если я даже не так выразился, не стоит уже так критично насчет крестика...
но ЯВНО крестик это не продолжение выполнение как при нажатии на ок (при ok_only)
или вообще ничего (при ok_button) - зачем мне тогда крестик если функция продолжается как при нажатии ок?
п.с насчет

Сообщение от gomer особенно (setq done 1) - это вообще идиотизм

согласен и убрал, а

Сообщение от gomer Но потом оказалось, что обыкновенный "винапишный" подход - гораздо проще: достаточно одной функции, аналогичной WndProc и функции запуска диалога типа DialogShow.

хотелось посмотреть пример с лиспом (или ссылку, интересно чем возиться с dcl и кнопки-"ок" в частности)

п.с Все равно спасибо, всегда что-небуть новенькое узнаешь