Вниз
Скачать: CL | DM;

Покрасить строчку в DBGrid   Найти похожие ветки 

← →
Alex-kosmonavt   (2004-01-27 10:59) [0]

Как покрасить строчку в нужный цвет, если определенное поле этой строки содержит определенное значение?
Я нашел способ как определить значение, но не могу понять как в процедуре TextOut задать текстовую строку, значение ячейки, хелп!
Вот немного кода
Где вопросики там проблема
With Grid.Canvas do
begin
if (qGetPr.FieldByName("Type").AsString="Main") and not (gdfocused in State) then
begin
Brush.Color:=clRed;
font.Color:=clBlack;
FillRect(Rect);
TextOut(Rect.Left,Rect.Top, ???????? );
end


← →
fdff   (2004-01-27 11:02) [1]

Держи краба

if (table1.FieldByName("kolich").Value=999) then
DBGrid1.Canvas.Font.Color := clred;
DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);


← →
Alex-kosmonavt   (2004-01-27 11:07) [2]

Ругается говорит не знаю что такое Column


← →
Плохиш_   (2004-01-27 11:07) [3]

Новый курс дошёл до темы раскрашивания грида :-)


← →
Stas ©   (2004-01-27 11:09) [4]

Ты наверное перепутал событие тебе нужно это:
onDrawColumnCell
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin


← →
Alex-kosmonavt   (2004-01-27 11:13) [5]

Точно!
Тьфу, поспешил , и тыкнул в соседний евент, там где ондроу дата селл.

все теперь работает. Сенькс


← →
DenK_vrtz ©   (2004-01-27 11:17) [6]

>Alex-kosmonavt

Когда же поиском то научимся пользоваться? Этот вопрос каждый день задают, максимум через день



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c
1-53450
lokid7
2004-02-06 17:11
2004.02.17
Взаимодействие между двумя классами


1-53554
TUser
2004-02-05 12:45
2004.02.17
jedi


14-53754
Brahman
2004-01-27 13:54
2004.02.17
Дела обычные..


1-53602
2Freak
2004-02-07 19:24
2004.02.17
JPEG на Pascal или в консольном приложении Delphi


11-53435
Dimaxx
2003-06-03 21:22
2004.02.17
Как у Toolbar а получить вертикальную полоску




   Наверх