Перейти к содержанию
Fire Monkey от А до Я
  • 0

Установил trial delphi 10 Seattle , не применяются стили к item


kramler

Вопрос

Установил trial delphi 10 Seattle , не применяются стили к item

 

Интересная вещь , создал стиль

добавил Trectangle залил его синим цветом , stylename = stitem

 

далее простой код

 

procedure TForm1.Button1Click(Sender: TObject);
Var
 Item : TListBoxItem;
begin
 Item := TListBoxItem.Create(nil);
 Item.Text:=IntToStr(ListBox1.Items.Count)+' строка';
 Item.StyleLookup:='stitem';
 Item.Parent:=ListBox1; 
end;

 

если компилировать для 

64-bit Windows то все хорошо добавляется синий item

а вот если компилировать в

32-bit то ни при каком обстоятельстве style не применяется,

 

может кто сталкивался и знает как исправить

post-432-0-74112500-1441918896.png

post-432-0-23411800-1441918901.png

Изменено пользователем kramler
Ссылка на комментарий

Рекомендуемые сообщения

Ответов пока нет

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

  • Последние посетители   0 пользователей онлайн

    • Ни одного зарегистрированного пользователя не просматривает данную страницу
×
×
  • Создать...