0 Members and 1 Guest are viewing this topic.
Сбросить все стили [] (пустое множество).
Спасибо. Думал может можно как то по отдельности их отключать. У меня проблема такая: 1) на текстовые метки назначен "стиль" жирный (изменяется через скрипт глобально в Resource из репозитория)Read more...procedure Execute(var State: Integer);varTitleMax: TComponent;begin TitleMax := FindResource('TextTitleMax'); begin case State of 0: TitleMax.Set('Style', '[]'); 1: TitleMax.Set('Style', '[Bold]'); end; end;2) при наведении на текстовые метки срабатывает скрипт onMouseEnter Read more...procedure Execute(Sender, Arguments: TComponent);begin Sender.Set('Font.Style','[fsUnderline]')end;при отведении onMouseLeave Read more...procedure Execute(Sender, Arguments: TComponent);begin Sender.Set('Font.Style','[]')end;соответственно сбрасывается с жирного на обычный