давайте по полочкам разложу. Что бы было проще общаться с поддержкой - был сделан элементарный библиотечный объект, состоящий из
1) SVG объекта (окно pTST). Простой прямоугольник с текстом. Динамизированы в нем 2 параметра, цвет прямоугольника и текстовое поле.
изображение_2022-03-28_132235.png
cTablo - цвет и vTablo - значение
изображение_2022-03-28_132535.png
2) Так как на SVG объекты нельзя накладывать стандартные контролы, то было создано стандартное окно oTST. На это окно был наложен объект pTST и стандартный прогресс
изображение_2022-03-28_132850.png
3) Для работы с объектом к нему был приделан программный интерфейс TSTint с параметрами
изображение_2022-03-28_133202.png
где pSTS - входной параметр состояния, в котором упакованы значения (для прогресса и текстового поля),
oV - выходной параметр с значением
oC - выходной параметр для цвета
процедурка выглядит так:
изображение_2022-03-28_133531.png
3) Так как при переносе объекта в проект параметры процедуры становятся недоступными, в объекте была сделана еще одна прокладка
переменные iP01, oP1,oP2. которые были связаны с параметрами процедуры
изображение_2022-03-28_133840.png
Ну по библиотечному объекту все. В дереве библиотеки он выглядит так:
изображение_2022-03-28_133959.png
4) Процедуру создания АРМ и главного окна я подробно не расписываю, как не относящиеся к теме.
Дерево проекта выглядит вот так.
изображение_2022-03-28_134300.png
Тут есть главное окно (Окно 1), добавлено 2 экземпляра библиотечного объекта pTST(pTST 1 и pTST2) и 2 параметра для управления объектами pTST - X1 и X2.
Экземпляы pTST и Параметры X1 и X2 размещены на ОКНО 1. Выглядит это так:
изображение_2022-03-28_134729.png
Параметр X1 и X2 связаны с параметрами iP01 экземпляров pTST 1 и pTST2
Уффф, долго писал. А теперь запускаем проект.
изображение_2022-03-28_135417.png
А вот это результат выполнения. Стандартные элементы отратывают, SVG объект слеп.