![]() |
|
|
|
|
#1
|
|||
|
|||
|
Всем доброго времени суток, подскажите пожалуйста, где я ошибся...
Код:
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, все корректно работает.. заранее спасибо... |
|
#2
|
||||
|
||||
|
посмотри правильный ли маршрут
Код:
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; |
|
#3
|
|||
|
|||
|
по всей видимости - правильный...
|
|
#4
|
||||
|
||||
|
а в SkinName должен быть маршрут, или только имя файла, там вроде для директории другое свойство
|
|
#5
|
|||
|
|||
|
пробовал и с директорией как вы уже видели в коде в первом посте, и просто с именем -
Код:
sSkinManager1.SkinName := 'Desert.asz'; |
|
#6
|
||||
|
||||
|
Ну тогда надо рыть описание компонента, может еще какую функцию надо запустить. Ну я бы еще showmessage просмотрел бы всё что можно когда путь установлен вручную и работает
|