[Support]

Hello.

You read the “Getting started” part in the help-file?

[Jore]

I already know to install the alpha control.

I want to be able to exchange the skins using a sCombobox.

Does anyone have a tutorial to teach me how to do this?

see my project on the link below

My Skin Alpha Control

Thank you very much

[Support]

'Jore' wrote:

I want to be able to exchange the skins using a sCombobox.

You can find an example in the ASkinDemo project. You saw that?

[Jore]

Yes I saw.

But there's something wrong going on that is not working out my code.

see my example on the link below.

Thank you!

My link

Obrigado!

[Jore]

Please someone help me

[Jore]

Please someone help me

[Support]

Hello

Try this code :

Code:

procedure TForm1.sComboBox1Change(Sender: TObject);
var
IniFile : TIniFile;
begin
sSkinManager1.SkinName := sComboBox1.Text;
end;

Be sure that sSkinManager1.SkinDirectory is initialized correctly.

And why you have added ' (internal)' in combobox items? Your project haven't internal skins with such names.

And why you not uses a sample from the ASkinDemo project?

[Author]

Posts