Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

[TListView]: иконки в SubItems [D7]


garun ©   (2014-12-17 13:30:00) 

Добрый день!

На форме есть ListView в режиме vsReport, 3 столбца.
Хочу чтобы иконки отображались во втором столбце (SubItem[0]), в свойствах ListView SmallIcons указываю нужный ImageList. затем пишу код:

[CODE]
procedure TForm1.btn1Click(Sender: TObject);
var
 itm: TListItem;
begin
itm:= ListView1.Items.Add;
with itm do
begin
 Caption:= 'sdfsf';
 SubItems.Add('sdfsdfsdf');
 SubItems.Add('s444fsdf54645sdf');
 SubItemImages[0]:=0;
end;
end;
[/CODE]

В итоге почему-то в первый столбец тоже добавляется иконка, получается вот так:
[IMG] http://s020.radikal.ru/i702/1412/94/bee6edc18034.png[/IMG]

Пробовал в процедуре добавления ставить [B]ImageIndex:=-1;[/B], в итоге иконка в первом столбце не отображается, но под нее выделено пространство. Как убрать вот это пустое место перед первым столбцом?
[IMG] http://s019.radikal.ru/i634/1412/c0/21fe6d51c8ac.png[/IMG]


Dennis I. Komarov   (2014-12-18 18:25:00) [1]


> DVM ©   (17.12.14 16:32) [1]

Что там мучительного?
OnCustomDraw+

P.S.
 А если еще у Розыча подсмотреть немного


DVM   (2014-12-17 16:32:00) [2]

советую сразу взять VirtualTreeView, со стандартным ListView вы еще намучаетесь, многое в нем реализовать сложно будет и неудобно.


Наверх

Титульная страница Поиск, карта сайта Написать письмо