Помогите не пойму

← →
DelphiM © (2003-09-08 13:44) [0]

Помогите
Вот обработчик события dbgrid-a

procedure TForm1.dbgrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if Column.Field.DataType = ftBoolean then begin
with TDBGrid(Sender).Canvas do begin
TDBGrid(Sender).Canvas.FillRect(Rect);
if Column.Field.Text = "True" then
ImageList.Draw(TDBGrid(Sender).Canvas,Rect.Left,Rect.Top,0 );
End;

Но проблема когда ячейка в режиме редактирования то текст всеравно виден как ‘True’ или ‘False’ а не как кортинка
как избавится от этого ????

← →
stud © (2003-09-08 13:46) [1]

тогда надо еще и state обрабатывать

← →
stud © (2003-09-08 13:48) [2]

к тому же нет дефолтной прорисовки при невыполнении условия

> if Column.Field.Text = "True" then

на OnColEnter написать следующее:

if DBGrid.SelectedField=Нужное_Поле then
DBGrid.Options:=DBGrid.Options-[dgEditing];
else
DBGrid.Options:=DBGrid.Options+[dgEditing];

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