Найдено 1076 результатов

Yufil
26 Июнь 2019, 18:54
Форум: CLARION for Windows
Тема: Запрет повторного запуска приложения
Ответы: 3
Просмотры: 57

Запрет повторного запуска приложения

Если ещё живёт DDE, то всё просто ! В начале приложения пытаемся получить клиента Name="Моя программа" Client# = DDEClient( Name ) !Если клиент получен - приложение уже запущено IF Client# ! Отправляем по DDE сообщение DDEWrite( .... ) ! И остановимся Halt(0) ELSE ! Откроем свой сервер ... Server# =...
Yufil
22 Июнь 2019, 22:07
Форум: CLARION for Windows
Тема: Подбор размера шрифта для динамического контрола
Ответы: 4
Просмотры: 115

Подбор размера шрифта для динамического контрола

Насколько я помню , в Кларионе использовалась следующая методика. Возможно, сейчас по-другому 1. Ширина буквы = 4 пункта ( исходя из размера заданного шрифта ) 2. Высота буквы = 8 пунктов 3. Для определения средней ширины буквы на экран выводится строка '0123456789ABC.....Zabc.....z' ( в 5.5 попытал...
Yufil
20 Июнь 2019, 11:13
Форум: CLARION for Windows
Тема: Доступ к очереди из процедуры
Ответы: 7
Просмотры: 140

Доступ к очереди из процедуры

1. Для поиска по ключу вовсе не обязательно сортировать очередь.
2. Есть форма get с идентификатором строки
GET( MyQueue, '+MyQueue.Field' )
Yufil
20 Июнь 2019, 10:32
Форум: CLARION for Windows
Тема: Чисто гипотетически !
Ответы: 64
Просмотры: 375

Чисто гипотетически !

Сейчас никак, просто имею компилированный в exe скрипт - передаю параметры, исполняю, выкладываю результаты в файлы и возвращаю управление. Когда-то делал интерфейс Clarion-Python, но не сложилось.
Yufil
20 Июнь 2019, 9:58
Форум: CLARION for Windows
Тема: Чисто гипотетически !
Ответы: 64
Просмотры: 375

Чисто гипотетически !

Зато просто. А последние лет пять парсю только Питоном ( lxml, beautifulsoup, xmltodict ) - цимес...
Yufil
20 Июнь 2019, 9:19
Форум: CLARION for Windows
Тема: Чисто гипотетически !
Ответы: 64
Просмотры: 375

Чисто гипотетически !

Я в модуле cpxml.dll шестнадцатеричным редактором правил строку ( могу и ошибаться ) windows-1250 на windows-1251. Тоже работает, правда только с файлами, из памяти не... Но потом разобрался с UTF-8 и отказался от этой идеи
Yufil
19 Июнь 2019, 15:49
Форум: CLARION for Windows
Тема: Чисто гипотетически !
Ответы: 64
Просмотры: 375

Чисто гипотетически !

Вряд ли скорость парсинга для MS и Expat сильно отличается ( коллега Aragorn мерил ). А померить достаточно просто. На любое кларионовское окно добавь кнопку, в качестве обработчика шаблон ViewXML и попробуй загрузить XML-файл. ... А цепочки связанных xml-файлов это круто... Может быть, поюзать что-...
Yufil
19 Июнь 2019, 14:56
Форум: CLARION for Windows
Тема: Чисто гипотетически !
Ответы: 64
Просмотры: 375

Чисто гипотетически !

Привет, Костя!
Насколько мне известно, кларионовский парсер - это Expat, он тоже стандартный. Парсер целиком написан на сях и не нуждается во внешних интерфейсах. Зачем Microsoft?
Yufil
19 Июнь 2019, 11:57
Форум: CLARION for Windows
Тема: Чисто гипотетически !
Ответы: 64
Просмотры: 375

Чисто гипотетически !

Надо поискать по ключевому слову FillDomQueue, там разные примеры использования стандартного XML парсера. На диск писать не надо, строка в UTF-8 передаётся парсеру непосредственно. Но результаты парсинга тоже получаются в UTF-8, их надо в ASCII перегонять.
Yufil
19 Июнь 2019, 10:14
Форум: CLARION for Windows
Тема: Чисто гипотетически !
Ответы: 64
Просмотры: 375

Чисто гипотетически !

Если чисто теоретически - последний раз разбирал XML( SCORM 2004 manifest) питоноскриптом - пакетом xmltodict https://pypi.org/project/xmltodict/, потом можно и в JSON одной строкой выгрузить. Если через файл или входной-выходной поток - удобно... Правда, этот прожект с Кларионом слабо связан.
Yufil
31 Май 2019, 9:24
Форум: CLARION for Windows
Тема: CREATE и размеры
Ответы: 17
Просмотры: 363

CREATE и размеры

1. IF Event:Accepted всегда истинно...
2. Обработаем в TakeAccepted, нафиг остальные события, в самом начале

Код: Выделить всё

    lqc:Id =  Field() 
    Get(L:q:Control,lqc:Id)
    IF ~ErrorCode() 
       !  Вот здесь обработаем наш контрол...
    END
Yufil
29 Май 2019, 12:00
Форум: CLARION for Windows
Тема: CREATE и размеры
Ответы: 17
Просмотры: 363

CREATE и размеры

Я обычно создавал в окне невидимые прямоугольные ( box) контролы. В том месте, где будут размещаться кнопки, кладём прямоугольник и стандартным способом обеспечиваем его ресайзинг. А в конце метода Resizer.Resize определяем положение кнопок, привязанное к позиции и размерам скрытого прямоугольника. ...
Yufil
28 Май 2019, 16:44
Форум: CLARION for Windows
Тема: Закрытие окна по бездействию
Ответы: 10
Просмотры: 253

Закрытие окна по бездействию

Ну да, надо какой-то сервер времени иметь. Например, можно запрашивать у SQL-сервера.
Но можно просто запомнить время прошлого тика и сравнить с временем текущего тика. Если разница по времени велика, рассчитать поправку времени и исполнять с учётом поправки
Yufil
28 Май 2019, 16:18
Форум: CLARION for Windows
Тема: Закрытие окна по бездействию
Ответы: 10
Просмотры: 253

Закрытие окна по бездействию

Примерно так Переменная Glo:Stop_Time - время остановки программы. Если какие-то телодвижения происходят, это время сдвигается. Если время достигнуто - завершаемся. В Idle-процедуре cтоит что-то типа IF Clock() > Glo:Stop_Time HALT() END А в тех местах, где нажали кнопку ( отслеживал Event:Accepted ...
Yufil
28 Май 2019, 13:25
Форум: CLARION for Windows
Тема: Закрытие окна по бездействию
Ответы: 10
Просмотры: 253

Закрытие окна по бездействию

... В 12 часов по ночам Играет сигнал "CloseWindow" :D А что будет, если мы кнопками или клавишами тыкаем в другом треде? И Event:Timer портить не хочется, вдруг он мне нужен... Я у себя пользовал IDLE, она как-то надёжнее и действует сразу на все треды. Первично в глобальной переменной устанавливае...