![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
[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 вы еще намучаетесь, многое в нем реализовать сложно будет и неудобно.