Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.02;
Скачать: CL | DM;

Вниз

Ну помогите же!   Найти похожие ветки 

 
f0rm   (2002-04-16 23:52) [0]

Блин. Может я тупой но немогу никак программно сделать нужный мне итем в литвьюве на красном фоне

ЗЫ: Отдельный Item listview"a закрасить отдельным цветом?


 
Ra ©   (2002-04-17 05:56) [1]

а в чем проблема?
ставим OwnerDraw=true и пишем обработчик события OnDrawItem


 
f0rm   (2002-04-17 11:52) [2]

Ну вот допустим у меня есть listview1.items[i] как мне сделать, чтобы при нажатии на копку фон этого итема зарисовывался красным цветом?


 
Starkom   (2002-04-17 11:56) [3]

в ListBox2DrawItem:
if (odSelected in State) then
begin
ListBox2.Canvas.Pen.Color:=clHighLight;
ListBox2.Canvas.Brush.Color:=clHighLight;
ListBox2.Canvas.Font.Color:=clRed;
end;
ListBox2.Canvas.Rectangle(Rect);
ListBox2.Canvas.TextOut(Rect.Left, Rect.Top, ListBox2.Items[Index])

прямо код свой кинул - сам наверное разберешься, там просто


 
exchoper ©   (2002-04-17 12:48) [4]

procedure TfmMain.lvTestCustomDrawItem(Sender: TCustomListView;
Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
var
NodeRect: TRect;
begin
with lvLocsRes.Canvas do
begin
NodeRect := Item.DisplayRect(drBounds);
case integer(Item.Data) of
0 : Brush.Color:=clBlue;
else Exit; end;
FillRect(NodeRect);
end;
end;


 
exchoper ©   (2002-04-17 12:49) [5]

procedure TfmMain.lvTestCustomDrawItem(Sender: TCustomListView;
Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
var
NodeRect: TRect;
begin
with lvtest.Canvas do
begin
NodeRect := Item.DisplayRect(drBounds);
case integer(Item.Data) of
0 : Brush.Color:=clBlue;
else Exit; end;
FillRect(NodeRect);
end;
end;


 
f0rm   (2002-04-17 16:44) [6]


> в ListBox2DrawItem:


2Starkom: А причем тут tlistbox?


> procedure TfmMain.lvTestCustomDrawItem(Sender: TCustomListView;
> Item: TListItem; State: TCustomDrawState; var DefaultDraw:
> Boolean);
> var


2exchoper: Закрашивать все итемы и я могу, а мне нужно закрасить один или несколько


 
exchoper ©   (2002-04-18 11:14) [7]

В моем варианте была закраска итемов только тех у которых в Data 1 прописана, остальные будут по-молчанию рисоваться, я же не выставляю DefaultDraw в FALSE а проседурка эта вызывается перед каждой прорисовкой итема, т.ч. все будет так как тебе надо, у меня все это отлично работает и именно для отдельных итемов, ты попробуй...


 
f0rm   (2002-04-18 17:31) [8]


> В моем варианте была закраска итемов только тех у которых
> в Data 1 прописана, остальные будут по-молчанию рисоваться,
> я же не выставляю DefaultDraw в FALSE а проседурка эта вызывается
> перед каждой прорисовкой итема, т.ч. все будет так как тебе
> надо, у меня все это отлично работает и именно для отдельных
> итемов, ты попробуй...


Пришлось отдельным итемам задавать indent разный



Страницы: 1 вся ветка

Текущий архив: 2002.05.02;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.007 c
1-2577
СанчоП
2002-04-19 16:16
2002.05.02
Help me!!!


1-2613
Satirus
2002-04-20 15:51
2002.05.02
TreeView : LoadFromFIle( file.xml );


14-2652
Den_
2002-03-26 16:21
2002.05.02
Подскажите, плиз!


1-2592
большой НовиЧОК
2002-04-19 19:10
2002.05.02
ПЛИИИИИИИИИИЗ!!!! :)


1-2505
dfdfd
2002-04-20 19:53
2002.05.02
Как скопировать файл??