Перейти к содержанию
  • 0
kramler

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

Вопросы

Установил 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 пользователей онлайн

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

×
×
  • Создать...