компонент AlphaControls в Delphi - Компоненты Delphi

TaYgA · 23.11.2009, 13:40

Всем доброго времени суток. Установил компанент AlphaControls, добавил на форму SkinManager, попытался програмно прописать путь к скинам и имя самого скина в процедуре FromShow:

Код:

  SkinManager.Active:=True;
  SkinManager.SkinDirectory:=ExtractFilePath(ParamStr(0))+'Skins\';
  SkinManager.SkinName:='WMP11.asz';

Delpgi не выдаёт никаких ошибок, но при запуске программы скин не загружается... Кто пользуется этим компанентом подскажите пожалуйсто, что нитак?!?!

DomiNick · 23.11.2009, 17:22

Ну... Во-первых не надо писать расширение... Просто:

Код:

sSkinManager1.SkinName:='WMP11';

А во вторых обнаружил странный вещь: если писать это в FormCreate - всё нормально, а если при нажатии на кнопку - изменяется только после сворачивания/разворачивания окна или при смене/возврате фокуса...

Хотя можно добавить

Код:

Form1.Visible:=False;
Form1.Visible:=True;

TaYgA · 23.11.2009, 17:46

DomiNick, огромнейшее вам СПАСИБО, работает

23.11.2009, 13:40	#1
TaYgA Форумчанин Регистрация: 24.09.2009 Сообщений: 264	компонент AlphaControls в Delphi Всем доброго времени суток. Установил компанент AlphaControls, добавил на форму SkinManager, попытался програмно прописать путь к скинам и имя самого скина в процедуре FromShow: Код: `SkinManager.Active:=True; SkinManager.SkinDirectory:=ExtractFilePath(ParamStr(0))+'Skins\'; SkinManager.SkinName:='WMP11.asz';` Delpgi не выдаёт никаких ошибок, но при запуске программы скин не загружается... Кто пользуется этим компанентом подскажите пожалуйсто, что нитак?!?!

23.11.2009, 17:22	#2
DomiNick Студент, не Старожил Регистрация: 29.01.2009 Сообщений: 2,067	Ну... Во-первых не надо писать расширение... Просто: Код: `sSkinManager1.SkinName:='WMP11';` А во вторых обнаружил странный вещь: если писать это в FormCreate - всё нормально, а если при нажатии на кнопку - изменяется только после сворачивания/разворачивания окна или при смене/возврате фокуса... Хотя можно добавить Код: `Form1.Visible:=False; Form1.Visible:=True;` I am the First of Cyber Evolution... I am the First to Program your Future...

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Delphi. Компонент-предок, компонент-родитель	amico	Помощь студентам	1	23.09.2015 21:20
Установка AlphaControls	spamer	Компоненты Delphi	22	09.06.2012 13:37
Вышла ошибка при Инсталляций AlphaControls на Delphi 2010	Vill	Общие вопросы Delphi	2	11.11.2009 17:52
Компонент AlphaControls	AXEnic	Компоненты Delphi	3	14.06.2009 07:33
Установка AlphaControls v5.31	athlant64	Компоненты Delphi	4	08.03.2008 12:08

23.11.2009, 17:46	#3
TaYgA Форумчанин Регистрация: 24.09.2009 Сообщений: 264	DomiNick, огромнейшее вам СПАСИБО, работает