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

Вниз

Разноцветный D B G R I D   Найти похожие ветки 

 
dik   (2004-03-31 10:03) [0]

Рассматриваю по шагам пример с разноцветным DBGrid-ом:

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
 DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
 with  DBGrid1.Canvas do
 begin
   Brush.Color:=clGreen;
   Font.Color:=clWhite;
   FillRect(Rect);
   TextOut(Rect.Left+2,Rect.Top+2,Column.Field.Text);
   TextOut(Rect.Left+2,Rect.Top+2,"111");
 end;
end;

при выполнении на
TextOut(Rect.Left+2,Rect.Top+2,Column.Field.Text);
выдает ошибку!
Если вместо Column.Field.Text пишу строковую константу, то работает без проблем.
В чем причина?


 
Johnmen ©   (2004-03-31 10:06) [1]

>В чем причина?

В ошибке.


 
dik   (2004-03-31 10:12) [2]

В чем ошибка? Исходный код взял из статьи.


 
Johnmen ©   (2004-03-31 10:23) [3]

>В чем ошибка?

Мне отсюда не видно...
:)


 
Infom ©   (2004-03-31 10:28) [4]

Этот вообще что
Column.Field.Text


 
Соловьев ©   (2004-03-31 11:09) [5]

При дебаге - что находится в Column.Field.Text?



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

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

Наверх




Память: 0.47 MB
Время: 0.045 c
3-1080736757
прогерШ
2004-03-31 16:39
2004.04.25
Как отменить при мультиселекте все выделения?


1-1081108875
Mishenka
2004-04-05 00:01
2004.04.25
Пункты MainMenu


1-1081417685
Dysan
2004-04-08 13:48
2004.04.25
TTreeView


1-1081331234
Mikki
2004-04-07 13:47
2004.04.25
Построчный вывод текста


11-1065294540
Wiz@rd
2003-10-04 23:09
2004.04.25
KolWebBrowser