[jenswahl]

Hello,

the following part of code shows my problem (I've only the compiled version):

procedure TfMainPSLCR.actCRChoiceSkinExecute(Sender: TObject);

var

s: String;

sDir: String;

begin

//the sSkinManager1.SkinDirectory in Designtime ist 'D:EntwicklungAlphacontrolsSkins', but not in runtime (for my users)

//starts with the designtime-path in sDirectoryEdit1 (but sSkinManager1.SkinDirectory has the correct runtime-path since FormCreate):

// SelectSkin(sSkinManager1);

//also try to set the right path in runtime again:

sDir := 'c:programswahlwareskins';

s := sSkinManager1.SkinName;

//if the SelectSkin-Form is shown I will get the Designtime-path in sDirectoryEdit1 but no user has this one

if SelectSkin(s, sDir) then begin

sSkinManager1.SkinName := s;

end;

if sSkinManager1.SkinName <> WW_NIX then begin

//…

end;

end;

How can I start SelectSkin with the correct (runtime-)path to the skin-folder?

Kind wishes

Jens Wahl

[Support]

Hello

I'll try to improve it in the nearest release.

[Author]

Posts