Всем доброго времени суток, подскажите пожалуйста, где я ошибся...
Код:
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, все корректно работает.. заранее спасибо...