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

Как отобразить выделенный ListBoxItem не пользуясь цветом фона

Вопросы

Есть разноцветные ListBoxItem-ы, надо вывести картинку или радиобатон, которые обозначали бы, что данный пункт сейчас выделен.

Как это сделать?

Поделиться сообщением


Ссылка на сообщение

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

  • 0

Не уверен что правильно понял вопрос, но попробую ответить так как понял.

var
RB : TRadioButton;
begin
  RB := TRadioButton.Create(ListBox1.ItemByIndex(1));
  RB.Parent := ListBox1.ItemByIndex(1);
  RB.Align := TAlignLayout.Right;



end;

Ну или TImage вместо TRadioButton.

Поделиться сообщением


Ссылка на сообщение
  • 0

Поясню. У  ListBoxItem-ов  есть некий стиль. В момент его применения рисуются RadioButton из стиля. Как мне в момент изменения состояния Selection данной строки списка, установить точку внутрь  RadioButton?

Первая проблема - найти событие на изменение состояния Selection.

Вторая проблема - изменить состояние RadioButton. 

Поделиться сообщением


Ссылка на сообщение
  • 0

Если я правильно понял (Вы сделали свой стиль для ListBoxItem и вставили туда свой RadioButton), то:

1. Вам нужно присвоить "stylename" для этого RadioButton в стиле, допустим назвали вы его "MyRB".

2. В обработчике событий ListBox'a - OnItemClick пишем:

procedure TForm1.ListBox1ItemClick(const Sender: TCustomListBox;
  const Item: TListBoxItem);
var
i : integer;
begin
   for i := 0 to ListBox1.count-1 do 
      ListBox1.ItemByIndex(i).StylesData['MyRB.IsChecked'] := False;

   Item.StylesData['MyRB.IsChecked'] := True;
end;

Поделиться сообщением


Ссылка на сообщение

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

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

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

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

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

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

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

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


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

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

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