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

Вниз

Помогите - ListView !!!   Найти похожие ветки 

 
BAHO ©   (2002-05-04 04:20) [0]

Подскажите как в ListView со столбцами разукрасить ячейки...
но так чтобы при изменении в них текста небыло видно перерисовки...!(мелькания)
я делаю так:
:

procedure TCCS.ListView1CustomDrawSubItem(Sender:TCustomListView;
Item: TListItem; SubItem: Integer; State: TCustomDrawState;
var DefaultDraw: Boolean);
const
NoConCol=tcolor($AAAAFF);
YeConCol=tcolor($AFFAAA);
begin
PatBlt(ccs.Canvas.Handle,0,0,ccs.ClientWidth,ccs.ClientHeight,WHITENESS);//это для того чтобы не переполнялся Canvas
case subitem
of
1:if ListView1.Canvas.Brush.color<>NoConCol
then ListView1.Canvas.Brush.color:=NoConCol;
2:
begin
if ListView1.Canvas.Brush.color<>YeConCol
then ListView1.Canvas.Brush.color:=YeConCol;
end;
end;
end;
:

подскажите чего я делаю не так...
Заранее спасибо...
:


 
BAHO ©   (2002-05-07 02:50) [1]

HELP


 
Кулюкин Олег ©   (2002-05-07 08:28) [2]

RTFM
TListItems.BeginUpdate,
TListItems.EndUpdate



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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
3-64561
Карина
2002-04-24 12:29
2002.05.20
отбор данных как функция ВПР в Excel


3-64533
JaMin
2002-04-23 17:23
2002.05.20
Помогите!!!


3-64490
Vint
2002-04-22 23:43
2002.05.20
ODBC


14-64789
Martyn
2002-04-08 15:34
2002.05.20
Delphi + Excel


14-64832
LazorenkoX
2002-04-11 17:44
2002.05.20
KOL