Изменение скинов

[Vill]

Всем привет. В Alpha Skins есть разные скины с расширением .asz
Как в проге можно сделать допустим на клике на button чтоб менялся скин!

[QunneD]

Обсуждалось много раз. Рулим поиском!

[dani92]

Сообщение от Vill

Всем привет. В Alpha Skins есть разные скины с расширением .asz
Как в проге можно сделать допустим на клике на button чтоб менялся скин!

смотри демки, все хорошо описано и написано

[Johnson]

SkinManager1.SkinName:='WMP 2008'; // это название файла скинов без расширения

или лучше в КомбоБоксе сделать:

procedure TOptionsForm.FormCreate(Sender: TObject);
var
i:integer;
sl : TStringList;
begin
  sl := TStringList.Create;
  VKform.sSkinManager1.GetSkinNames(sl);
  SkinBox.Clear;
  for i := 0 to sl.Count - 1 do begin
    SkinBox.Items.Add(sl[i]);
  end;
end;

procedure TOptionsForm.SkinBoxChange(Sender: TObject);
begin
VKform.sSkinManager1.SkinName:=SkinBox.Text;
end;

вот у меня так скины организованы... только ещё сохранение в INI файл организовано и включение/отключение скинов...