[Kujo]

Hello,

1. Load your internal skins using the “InternalSkin” property.

2. Select a skin using the “SkinName” property.

3. Save the project

Now the skin you have selected is used as default and it is always loaded when you start the program (this is true also if you use an external skin).

P.S. Please remember that the name of an internal skin is the name of the skin plus ” (internal)”, example:

External skin name: “Acryl”

Internal skin name: “Acryl (internal)”

Bye

[Util_Delphi]

Bonjour.

So I put an inner skin as I usually do.

procedure TForm1.Btn_ActiverClick(Sender: TObject);

begin

Form1.sSkinManager1.Active := True;

Form1.sSkinManager1.SkinDirectory := 'C:TOUS LES THEMES';

Form1.sSkinManager1.SkinName := 'Acryl (internal)'; // does not work : Even with (external) it does not work

Form1.sSkinManager1.RepaintForms(True);

Form1.Btn_Quitter.SetFocus;

end;

It is necessary that the skin is active from the start? No other solution? I think I misunderstood…

Merci 😉

[Kujo]

Hello,

Code:

procedure TForm1.Btn_ActiverClick(Sender: TObject);
begin

//Form1.sSkinManager1.Active := True; // before you have to select a skin
Form1.sSkinManager1.SkinDirectory := 'C:TOUS LES THEMES';
Form1.sSkinManager1.SkinName := 'Acryl';
Form1.sSkinManager1.Active := True;
Form1.sSkinManager1.RepaintForms(True); // in XE2 it works also without this

Form1.Btn_Quitter.SetFocus;

end;

And don't forget to add the sSkinProvider component!

[Util_Delphi]

'Kujo' wrote:

Hello,

Code:

procedure TForm1.Btn_ActiverClick(Sender: TObject);
begin

//Form1.sSkinManager1.Active := True; // before you have to select a skin
Form1.sSkinManager1.SkinDirectory := 'C:TOUS LES THEMES';
Form1.sSkinManager1.SkinName := 'Acryl';
Form1.sSkinManager1.Active := True;
Form1.sSkinManager1.RepaintForms(True); // in XE2 it works also without this

Form1.Btn_Quitter.SetFocus;

end;

And don't forget to add the sSkinProvider component!

[Util_Delphi]

Thank you! It works! It had to sSkinProvider component that I had forgotten.

[Support]

Hello!

This line is not needed:

Code:

Form1.sSkinManager1.RepaintForms(True);

[Author]

Posts