[===AAA===]

Добрый день всем!

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

Т.е. хочешь - вводи свои данные, хочешь - выбирай
из предварительной наборки.

[Сергей812]

Offtop:

Сообщение от ShaggyDoc В современных средах программирования ничем подобным и не надо заниматься.

ну там и нет прямого доступа к физическим ресурсам ПК вследствие многозадачности операционных систем, если не написан тот же драйвер, например. Но написание драйверов - это сейчас уже далеко за границами прикладного программирования, имхо)

странно, конечно - что за все эти годы не был реализован в DCL ComboBox режим ввода, в результате чего ТС приходится колхоз городить. Или "движок" DCL не трогали с момента его реализации - работает, ну и хорошо)

[Do$]

Сообщение от Кулик Алексей aka kpblc Do$, в чем рисовал? )))

https://pencil.evolus.vn/

[Александр Ривилис]

Offtop:

Сообщение от Сергей812 ну если посмотреть в википендии

В этой статье столько бредовой информации, что плевался чуть ли ни на каждой строке...

[Сергей812]

Offtop:

Сообщение от Александр Ривилис В этой статье столько бредовой информации, что плевался чуть ли ни на каждой строке...

это же вики, а не научное издание или официальное руководство) Да и для подавляющего большинства пользователей Акада и не нужна эта информация, имхо - они пользуются лишь готовыми решениями и шаблонными действиями, не углубляясь в технические дебри...

[Zemlemer]

Здравствуйте! Еще вопрос про dcl. При переходе в новый диалог меняются введенный текст и исчезают значения переменных. Скажите, корректно ли обращаться так с диалогом и что я делаю с ним не так?

(action_tile "pipeD" "(setq pipeD (atof (get_tile \"pipeD\")))")

[Кулик Алексей aka kpblc]

Вообще-то все будет зависеть от того, что происходит до вызова второго диалога. Данные сохранены? Тогда ставь set_tile. Нет? Тогда сохраняй.

[Zemlemer]

Куда тут ставить Set_tile?
Заранее извиняюсь за глупые вопросы, но пока так и не понял, как работать с этими вот диалогами.
Вот так это выглядит сейчас:

Код:

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

  (defun	NVK ()

   (setq dcl_id (load_dialog "NVK.DCL"))


   (while (and (/= ddi 1) (/= ddi 0))
     (if (null (new_dialog "NVK" dcl_id))
       (exit)
     )

     (action_tile "settings" "(done_dialog 6)")
     (action_tile
       "pipeD"
       "(setq pipeD (atof (get_tile \"pipeD\")))"
     )
     (setq ddi (start_dialog))

     (cond ((= ddi 6)
	    (settings)
	   )
     )
   )
 )


 (defun	settings ()

   (if (null (new_dialog "settings" dcl_id))
     (exit)
   )

   (action_tile
     "scale"
     "(setq scale (atof (get_tile \"scale\")))"
   )

   (setq ddi (start_dialog))

   (unload_dialog dcl_id)

   (NVK)
 )

[koMon]

Сообщение от Do$ Если использовать DCL, то можно как-то так:

или так... только вот для перевода фокуса нужно кликать 2 раза

[Do$]

Сообщение от koMon или так...

Неужели это в DCL сделано?
Насколько я помню, там с картинками беда была. Можно было использовать только слайды.

[koMon]

Сообщение от Do$ Неужели это в DCL сделано? Насколько я помню, там с картинками беда была. Можно было использовать только слайды.

dcl, не только слайды.

----- добавлено через ~2 мин. -----
хотя сделать полноценную превьюшку блока вряд ли получится...

[Do$]

Сообщение от koMon не только слайды.

Я имел в виду, что нельзя вставить привычную картинку в виде png, bmp, jpg и т.п.
То, что можно векторами-отрезками рисовать - это "так себе" альтернатива...

[koMon]

это вообще не альтернатива! это такие конкретные костыли! это же касается и слайдов! но разрабы ведь не собираются добавлять в традиционный в dcl ничего нового, поэтому что имеем, из того и лепим. какой уж dcl они там используют для своих окошек - неведомо)))

[ShaggyDoc]

Сообщение от Do$ Я имел в виду, что нельзя вставить привычную картинку в виде png, bmp, jpg и т.п. То, что можно векторами-отрезками рисовать - это "так себе" альтернатива...

Много лет уже показываю, как навсегда избавиться от возни с DCL, при этом иметь все современные интерфейсные средства. Для сотен программ в итоге у меня оказались необходимыми всего несколько один раз и навсегда написанных диалогов:

1. Иллюстрированное древовидное меню с возможностью брать иллюстрации из чертежа или из любого окна или из буфера. Имеет наибольшее применение для чего угодно.
2. Выбор из списка.
3. Выбор из двух списков.
4. Ввод одной или двух строк (или чисел) с возможностями выбора из справочников и "взять в чертеже".
5. Отбор из списка с возможностью сортировки.

Научиться такое дело проще, чем разобраться с DCL. А для использования ничего не надо программировать, надо только обычным текстовым редактором править меню. При этом один диалог может использоваться и в других программах.

[Do$]

Это в чём сделанные окошки? Вы, скорее всего, уже раз сто на этот вопрос отвечали. Но я забыл... Вид у них, конечно, не сказать, что современный. Сейчас "в моде" анимация, динамика, прозрачность, полупрозрачность, креативный дизайн, адаптация под темы оформления ОС и тд и тп... По новым "веяниям", привнесённым разработкой для Web и мобильных приложений, меняются правила "хорошего тона" при составлении диалогов. Например - не принято делать кнопки "Сохранить" и "Отменить". Подразумевается, что все изменения должны сразу автоматически сохраняться.
А так - да, согласен, что можно много взаимодействий с пользователем свести к этому списку диалогов.

[Кулик Алексей aka kpblc]

Отвечу немного "наперед"
Delphi, регистрируемый COM-сервер, все дела...

[Сергей812]

Сообщение от Do$ Вид у них, конечно, не сказать, что современный. Сейчас "в моде" анимация, динамика, прозрачность, полупрозрачность, креативный дизайн, адаптация под темы оформления ОС и тд и тп... По новым "веяниям", привнесённым разработкой для Web и мобильных приложений, меняются правила "хорошего тона" при составлении диалогов. Например - не принято делать кнопки "Сохранить" и "Отменить". Подразумевается, что все изменения должны сразу автоматически сохраняться.

ничто сейчас не мешает запихать в сборку dll интерфейс на WPF со всеми эти красотами (обернув в Lisp подобные функции) и загрузив эту сборку в акад, вызывать прямо из кода lisp как обыкновенную функцию.

[ShaggyDoc]

Сообщение от Сергей812 ничто сейчас не мешает запихать в сборку dll интерфейс на WPF со всеми эти красотами (обернув в Lisp подобные функции) и загрузив эту сборку в акад, вызывать прямо из кода lisp как обыкновенную функцию.

Конечно. Тем более, что вариантов уже не один. А если кому нужны "свистелки-перделки", так все диалоги изменяют свой вид в зависимости от версии Windows и установленной темы оформления.

Сообщение от Do$ Например - не принято делать кнопки "Сохранить" и "Отменить".

У кого это "не принято"? Если пользователю надо выбрать что-то в диалоге, то какое изменение должно сразу сохраняться? Должна быть возможность именно выбрать с закрытием диалога (ОК) или просто его закрыть, ничего не выбрав.

Ну да, можно и здоровенных иконок наделать, где не надо. А где надо покрупнее - наоборот, унаследовать микроскопический навигатор БД, как у мелкософта и заставлять напрягать зрение.

Вот когда работаем с БД, так там для приложения в целом, нет пунктов Сохранить или Отменить - всё автоматом. Но для редактирования одной записи непременно есть и Применить и Отменить.

Вот из-за того, что "привнесено из WEB" одной из самых популярных услуг является замена Win10 на нормальные ОС.

[Diman111]

Сообщение от Сергей812 ничто сейчас не мешает запихать в сборку dll интерфейс на WPF со всеми эти красотами (обернув в Lisp подобные функции) и загрузив эту сборку в акад, вызывать прямо из кода lisp как обыкновенную функцию.

А не подскажите готовые решения для людей знакомых с ЛИСП но и только. Для которых регистрация DLL и вызов серверов не совсем тривиальная задача. Решения с готовыми библиотеками и кодом на лисп с вызовом окон, передачей и получением данных.

[Кулик Алексей aka kpblc]

Готовые решения только самостоятельно. dcl, callback-функции, вызывающие функции, обработка контролов и т.д.

[Сергей812]

Сообщение от Diman111 А не подскажите готовые решения для людей знакомых с ЛИСП но и только. Для которых регистрация DLL и вызов серверов не совсем тривиальная задача. Решения с готовыми библиотеками и кодом на лисп с вызовом окон, передачей и получением данных.

Ну регистрация DLL и вызов серверов для того, что предлагал выше - не требуется: это не внешний COM-сервер. Но придется изучить азы программирования на .Net - как накидать мышкой контролы на форму (чтобы сделать похоже на диалоги от ShaggyDoc), как организовать хранение данных. Затем почитайте документ de211-2.pdf "Communication between AutoLISP functions and .NET functions" от Аутодеска (он, правда, на английском языке).

Т.е. суть какая - хранение и выбор данных на внешних носителях пишется и отлаживается в бесплатной студии вообще отдельно от акада - а потом переносите отлаженные формы и сопутствующий код в проект сборки *.dll, оборачивая в вызов функций .Net с атрибутом LispFunction. Код на лиспе получает сразу готовые значения из возвращаемого значения функции .Net, а в аргументах этой же функции ResultBuffer args можно передать исходные значения для инициализации начального состояния диалогов - см. de211-2.pdf.

Можете конечно сразу и в WPF сунуться вместо WinForms, но там изначально не настолько прозрачно для понимания - цена за гибкость технологии)