Смена скина AlphaControls

[mephistopheies]

А пользоваться case вас походу не учили никого.

case skinbox.items.count of
0: MainForm.SkinManager.SkinName:='Lon gHorn (internal)';
1: MainForm.SkinManager.SkinName:='WLM (internal)';
....
end.

DjnУ меня тоже возниклаподобная трабла как и у топик стартера:
Сохранение,запись все нормально, при смене скина в OnCreate не все контролы отображаются как надо, создатся впечатление что, SkinSection в контроле каким-то образом сбивается.
Скины внутренние, в процессе работы проггаммы меняются отлично, а вот в обработчике On Create получается коряво. что посоветуете?

[Kotofff]

а вот в обработчике On Create получается коряво. что посоветуете?

Код сохранения и восстановления названия скина покажи.

[mephistopheies]

Чтение

var
  sIniFile: TIniFile;

begin
  sSkinManager1.GetSkinNames(sComboBox2.Items);
  sSkinManager1.SkinName := sComboBox2.Items.Strings[sComboBox2.ItemIndex];

Запись

 sIniFile.WriteInteger(secset,'Skin', sComboBox2.ItemIndex);

Попробовал грузить из папки, суть не поменялась.

[Kotofff]

var
  sIniFile: TIniFile;

begin
  sSkinManager1.GetSkinNames(sComboBox2.Items);
  sSkinManager1.SkinName := sComboBox2.Items.Strings[sComboBox2.ItemIndex];

А почему ты не присваиваешь сначала sComboBox2.ItemIndex значение из ini-шки ? Ведь так он всегда будет -1.

var
  sIniFile: TIniFile;

begin
  sSkinManager1.GetSkinNames(sComboBox2.Items);
  sComboBox2.ItemIndex := sIniFile.ReadInteger(secset,'Skin', 0); // примерно как-то так 
  sSkinManager1.SkinName := sComboBox2.Items.Strings[sComboBox2.ItemIndex];

А сам ini-файл открывал ? Там все пишется ?

[mephistopheies]

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

[CODE]
А сам ini-файл открывал ? Там все пишется ?

Не суть в записи и чтении,я показал кусоск кода, который отлажен и работает отлично. Суть в обработчике события при создании(OnCreate), который неправильно отрисовывает контролы.
З.Ы. Скачал с офф. сайта последнюю версию, половина разархивирвалось, половина под паролем, где взять пароль? Написано, что для жителей СНГ пакет компонент вроде как безплатный...

[mva]

половина под паролем, где взять пароль?

На странице http://alphaskins.com/index_rus.php написано :

Для жителей стран СНГ все компоненты являются бесплатными (независимо от того - коммерческий проект или нет). Платой за пользование могут быть Ваши критические замечания, советы, сообщения об ошибках и т.д. Пароль для распаковки архива с модулями - слово "коллекция", набранное маленькими русскими буквами в английской раскладке =)

Красным выделено то, что нужно !

[Kotofff]

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

половина под паролем, где взять пароль?

На странице http://alphaskins.com/index_rus.php написано сверху :

Для жителей стран СНГ все компоненты являются бесплатными (независимо от того - коммерческий проект или нет). Платой за пользование могут быть Ваши критические замечания, советы, сообщения об ошибках и т.д. Пароль для распаковки архива с модулями - слово "коллекция", набранное маленькими русскими буквами в английской раскладке =)

P.S.
подчеркнуть то, что нужно ?

[mephistopheies]

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

На странице http://alphaskins.com/index_rus.php написано сверху :


P.S.
подчеркнуть то, что нужно ?

Не стоит, попробую новую версию, возможно тамвопрос с перерисовкой решен.

[mephistopheies]

не стоит. Поставлю последнюю версию, может в ней решен вопрос перерисовки.

[mephistopheies]

Проблема не решилась. По прежнему при загрузке шкурки в событии OnCreate некоторые контролы криво отображаются.