[Мишка-90]

Всем доброго времени суток, подскажите пожалуйста, где я ошибся...

Код:

procedure TForm1.FormCreate(Sender: TObject);
begin
   sSkinManager1.Active := false;
   sSkinManager1.SkinDirectory:=ExtractFilePath(Application.ExeName)+ 'Skins';
   sSkinManager1.SkinName := ExtractFilePath(Application.ExeName)+ 'Skins'+ '\Desert.asz';
   sSkinManager1.Active := true;
end;

ошибок не выдает но и шкура не отображается, если задать путь в ручную в компоненте sSkinManager1, все корректно работает.. заранее спасибо...

[Viajero]

посмотри правильный ли маршрут

Код:

procedure TForm1.FormCreate(Sender: TObject);
begin
   sSkinManager1.Active := false;
   sSkinManager1.SkinDirectory:=ExtractFilePath(Application.ExeName)+ 'Skins';
   sSkinManager1.SkinName := ExtractFilePath(Application.ExeName)+ 'Skins'+ '\Desert.asz';
                     showmessage(sSkinManager1.SkinName)
   sSkinManager1.Active := true;
end;

[Мишка-90]

по всей видимости - правильный...

[Viajero]

а в SkinName должен быть маршрут, или только имя файла, там вроде для директории другое свойство

[Мишка-90]

пробовал и с директорией как вы уже видели в коде в первом посте, и просто с именем -

Код:

sSkinManager1.SkinName := 'Desert.asz';

[Viajero]

Ну тогда надо рыть описание компонента, может еще какую функцию надо запустить. Ну я бы еще showmessage просмотрел бы всё что можно когда путь установлен вручную и работает

[Мишка-90]

sSkinManager1.SkinName := 'Desert.asz';
showmessage(sSkinManager1.SkinName);

showmessage показал сообщение - Desert.asz

[Developer]

Нужно указать имя скина а не файл скина.

Код:

sSkinManager1.SkinName := 'Desert';

У меня всё работает.