TListBox Как сделать промежутки между подгруппами итемов?

[97mik]

Как сделать небольшой промежуток между Item? Примерно так же, как это сделано в настройках.

 

Изменено 26 января, 2014 пользователем admin
Уменьшена прикрепленная картинка для удобного просмотра.

[Brovin Yaroslav]

В FireMonkey TListBox поддерживает несколько готовых вариантов итемов:

1. TListBoxItem - обычный итем
2. TListBoxHeader - общий заголовок лист бокса.
3. TSearchBox - итем с полем поиска элементов по фильтру.
4. TListBoxGroupHeader - заголовок группы итемов (Его можно использовать, как разделитель групп, предварительно убрав текст Text = "")
5. TListBoxGroupFooter - подвал данных под группой итемов.

Подробное руководство о том, как создавать из TListBox любой вариант UITableView очень детально описано тут: Mobile Tutorial: Using ListBox Components to Display a Table View (iOS and Android)

 

[97mik]

TListBoxGroupHeader слишком большой по высоте, а изменить нельзя.

[Brovin Yaroslav]

Тогда нужно сделать свой стиль в TStyleBook и задать его для этого итема.

1. Кидаем на форму TListBox и создаем итемы. Для разделения групп настроек вставляем TListBoxGroupHeader. У меня получился такой вариант:

2. Кидаем на форму TStyleBook и открываем редактор стиля, двойным кликом на TStyleBook.

3. Перетаскиваем TLayout к корню стиля в Structure и задаем название стиля как "listboxgroupheader".

4. Подключаем стиль бук в дизайнере к форме Form.StyleBook = StyleBook и задаем произвольную высоту для разделителей групп итемов.

 

P.S. Если хотите оставить текст на разделителях, то нужно в стиль добавить контрол для вывода текст (TText или TLabel) с название стиля "text"

1. О том, почему некоторые контролы имеют фиксированный размер написано тут: Почему для некоторых контролов нельзя поменять высоту или ширину?
2. О том, как снять это ограничение (но не рекомендуется) написано тут: Как снять запрет изменения размера контролов