Forum Replies Created
-
Posts
-
'TCount' wrote:
Действительно, не работает)) Я даже не смотрел, потому как не пользуюсь этим.
Для нажатого состояния работают:
1. Градиент и текстура.
2. Цвет кнопки (нужно убрать или сделать прозрачными градиент и текстуру, чтобы использовался цвет).
Не работают:
1. Цвет текста, эффекты и GLOW.
А где можно скачать старую версию ?
Там всё работало.
'TCount' wrote:Про цвет Caption…Смотря что Вы имеете ввиду. Если программно менять цвет Caption, то для этого у кнопки нужно влючить свойство CustomFont.
Также цвета Caption в любом состоянии кнопки можно прописать через SkinEditor.
Меняю через SkinEditor. Меняю там, где написано: “Active 2 / Pressed” – нечего не происходит. Цвет Caption, в нажатом положении – не меняется на то, что я поставил.
Даже есть странность – цвет кнопки меняется, когда его прописываешь в “Active 2 / Pressed”, но меняется он, только в SkinDemo, а в программе, даже цвет кнопки не меняется.
Caption не меняется, даже в SkinDemo.
'TCount' wrote:Либо использовать sSpeedButton, либо про нажатии на кнопку переводить или обнулять фокус)
Например, в событии нажатия кнопки можно обнулить фокус:
procedure TForm1.sButton1Click(Sender: TObject);
begin
ActiveControl:=NIL;
end;
Спасибо ещё раз!
Я делал так:
Procedure TForm_Main.BUTTON_CLOSEMouseLeave(Sender: TObject);
Begin
BUTTON_CLOSE.SelectedImageIndex := 0;
End;
Procedure TForm_Main.BUTTON_CLOSEMouseEnter(Sender: TObject);
Begin
BUTTON_CLOSE.SelectedImageIndex := 1;
End;
Ваш способ короче, чем мой. спасибо.
'TCount' wrote:Чтобы контент на кнопке не сдвигался, есть настройки в SkinManager.
Вы мой спаситель!
Но остался ещё 1 вопрос.
Как мне сделать так, чтоб после клика на кнопку – она не светилась, как будто на неё навели.
чтоб было как в Windows: Навёл – засветилась, нажал – потускнела, отпустил – снова засветилась, так-как мышка, всё ещё наведена.
Чтоб она (Кнопка.) больше не светилась после того, как по ней по ней нажмёшь и уберёшь мышь.
