Говорящая подсказка (Ballon Style Help) обеспечивает контекстно-зависимую справку, которая автоматически отображается при каждом перемещении мыши на элемент формы. Вы можете использовать триггер WHEN – MOUSE – ENTER и системную переменную SYSTEM. MOUSE_ITEM.
Пример реализации подсказки
if : system.mouse_item is not null then
: control.ballon : =
initcup (substr (: system.mouse_item, instr
(: system.mouse_item, '. ', 1) +1));
Set_item_property ('control.ballon', y_pos, to_number (Get_item_property (: system.mouse_item, y_pos)) – 20);
Set_item_property ('control.ballon', displayed, property_true);
else
Set_item_property ('control.ballon', displayed, property_false).
|
Главная
Каталог файлов
