如何在DBGrid中的字段（完成标志）用图片代替？

Question

我想在DBGrid中字段（完成标志）里面用图片代替！可以选择！比如完成了就我就选个勾，没有完成我就选个叉，怎么处理啊？谢谢！

Answer 1

写DBGrid的OnDrawColumnCell事件procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
  If Column.FieldName='你要处理的字段' then
  begin
    With DBGrid1.Canvas do
    begin
      FillRect(Rect);
      If Column.Field.AsBoolean then
        TextOut(Rect.Left,Rect.Top,'V') // 可以用Word中的勾替换这里的"V"
      Else
        TextOut(Rect.Left,Rect.Top,'X');
    end;
  end;
end;

Answer 2

如果要处理的字段是布尔型的，也可以通过设置数据集的该字段的显示值，在设计期可以用字段编辑器。如：
  字段名.DisplayValues := '真;假'；// 前面的表示值为true的显示值，
                                   // 后面的表示为False的显示值