双击DBGrid，增加对应的Columns,在'bit类型'的Columns设置PickList增加串‘是’‘否’即可。

或者

procedure TForm1.Query2bgdGetText(Sender: TField; var Text: String;
  DisplayText: Boolean);
begin
    if Query2.FieldByName('bit类型').AsBoolean=false then
        Text:='是'
    else
        Text:='否';
end;