OnDrawColumnCell в TDBGrid

← →
R@nger © (2003-12-01 09:48) [0]

Здравствуйте! Проблема в следующем: нужно в DBGrid-е вместо значения True/False для логического поля отображать например Да/Нет...
Я знаю, что надо использовать OnDrawColumnCell, но что-то не пойму как...

Заранее thanx.

← →
Романов Р.В. © (2003-12-01 10:04) [1]

Другой вариант
TField.OnGetText

← →
stone © (2003-12-01 10:10) [2]

TBooleanField.DisplayValues = Да;Нет

← →
Silver Alex © (2003-12-01 10:27) [3]

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if Column.FieldName="MainField" then
begin
DBGrid1.Canvas.FillRect(Rect);
if ADODataSet1.FieldByName("MainField" ).asboolean then
DBGrid1.Canvas.TextOut(Rect.Left+ 1,Rect.Top+1,"Да")
else
DBGrid1.Canvas.TextOut(Rect.Left+ 1,Rect.Top+1,"Нет");
end;
end;

но согласен с Романовым, метод TField.OnGetText наверное предпочтительнее

← →
pasha_golub © (2003-12-01 10:50) [4]

www.delphikingdom.ru - Раздел Hello World!

>R@nger

Лучше слей EhLib и не мучайся.

http://www.ehlib.com/

← →
Amoeba (2003-12-01 11:46) [6]

Адреса для загрузки EhLib:
http://www.ehlib.com/RUS/default.htm
http://www.farpost.com/personal/dmitryb/RUS/downloads.htm

OnDrawColumnCell в TDBGrid Найти похожие ветки