Страница 2 из 2
Запрет повторного запуска процедуры из фрейма.
Добавлено: 01 Ноябрь 2016, 12:13
Yufil
Надо весь комплект скачать
http://www.authord.com/products/Clarion/, а я выложил только один файл.
Кстати, там много хороших вещей и потратить хотя бы часик-другой стоит
Запрет повторного запуска процедуры из фрейма.
Добавлено: 01 Ноябрь 2016, 12:18
Артур
Спасибо, скачал, буду пробовать
Запрет повторного запуска процедуры из фрейма.
Добавлено: 01 Ноябрь 2016, 12:51
Артур
Yufil писал(а): SetTarget(, Procname_thread)
Перед этим вставил post(EVENT:LoseFocus,,) и все заработало без шаблона.
Есть ли примеры с применением FreeABC ?
Запрет повторного запуска процедуры из фрейма.
Добавлено: 01 Ноябрь 2016, 13:02
kreator
Артур писал(а):Перед этим вставил post(EVENT:LoseFocus,,) и все заработало без шаблона.
Я не понял - почему приведённый мной текст не работает?
Запрет повторного запуска процедуры из фрейма.
Добавлено: 01 Ноябрь 2016, 13:15
Артур
kreator писал(а): Я не понял - почему приведённый мной текст не работает?
У меня не работает потому что он ориентирован на использование шаблона, который я так и не смог установить
Запрет повторного запуска процедуры из фрейма.
Добавлено: 01 Ноябрь 2016, 14:16
kreator
Это просто текст. Нужно заменить переменные шаблона на свои.
Запрет повторного запуска процедуры из фрейма.
Добавлено: 01 Ноябрь 2016, 14:28
Артур
kreator писал(а): vs::ThisThreadActive
Непонятен смысл этой переменной, т.к. она объявляется где то в шаблоне.
Все равно нужен post(EVENT:LoseFocus,,), т.к. без него не срабатывает POST(EVENT:GainFocus,,ActiveThread:Preferences).
Запрет повторного запуска процедуры из фрейма.
Добавлено: 01 Ноябрь 2016, 14:39
Yufil
В шаблоне в обработчик Event:GainFocus вставляется вытаскивание окна вперёд.
Запрет повторного запуска процедуры из фрейма.
Добавлено: 01 Ноябрь 2016, 14:41
Артур
Yufil писал(а): В шаблоне в обработчик Event:GainFocus вставляется вытаскивание окна вперёд.
Наверное, но я шаблон так и не победил.
Запрет повторного запуска процедуры из фрейма.
Добавлено: 01 Ноябрь 2016, 15:37
kreator
Артур писал(а):В шаблоне в обработчик Event:GainFocus вставляется вытаскивание окна вперёд.
Да, есть такое дело:
Код: Выделить всё
OF EVENT:GainFocus
IF SELF.Opened ! ThreadLimit (ABC Free)
IF window{PROP:Iconize}=TRUE ! ThreadLimit (ABC Free)
window{PROP:Iconize}=FALSE ! Restore if iconized ! ThreadLimit (ABC Free)
END ! ThreadLimit (ABC Free)
IF window{PROP:Active}<>TRUE ! ThreadLimit (ABC Free)
window{PROP:Active}=TRUE ! Bring to top ! ThreadLimit (ABC Free)
END ! ThreadLimit (ABC Free)
END ! ThreadLimit (ABC Free)