| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Icon в ListBox [D7, WinXP]
Steplerr © (2005-12-21 13:57:00)Как мне сделать что бы возле каждого элемента в списке ListBoxa была слева иконка?
з. танька (2005-12-21 22:25:00) [1]гм offset там не нужен откуда взялся непонятно
з. танька (2005-12-21 22:23:00) [2]в справке пример шикарный..
вот из свово проекта вытащила может понятней будет:
procedure TfrmSemSeti.lbViewDrawItem(Control: TWinControl; Index: Integer;
Rect1: TRect; State: TOwnerDrawState);
var
OffSet: Integer;
x,y,x1,y1: Integer;
begin
with (Control as TListBox).Canvas do begin
FillRect(Rect1);
Offset := 2;
//выводим картинку
Draw(Rect1.Left, Rect1.Top, Icons[Index]);
//выводим текст
TextOut(Rect1.Left + 34, Rect1.Top + 10, (Control as TListBox).Items[Index]);
end;
end;
Steplerr (2005-12-21 21:01:00) [3]
> з. танька (21.12.05 20:40) [3]
>
> OnDrawItem + F1
Думаешь не пробовал?! А чего там писать то?
з. танька (2005-12-21 20:40:00) [4]OnDrawItem + F1
Steplerr (2005-12-21 20:36:00) [5]Может и подойдёт, но в ListView выстраиваются элементы в строчку, а нужно в столбец.
REA (2005-12-21 15:15:00) [6]Может ListView подойдет?
| |
