请问 在dbgrid 中如何实现折行?

解决方案 »

  1.   

    这个问题以前研究过,当时想用两个 dbgrid 来模拟;不过效果不好
      

  2.   

    在DBGRID中要折行的用Memo1来代替显示。
      

  3.   

    Up
    用DBGridEh数据控制组件吧
      

  4.   

    procedure TManifest_Form.DBGrid1DrawColumnCell(Sender: TObject;
      const Rect: TRect; DataCol: Integer; Column: TColumn;
      State: TGridDrawState);
    var r: TRect;
    begin
      r := Rect;
      with DBGrid1.Canvas do begin
        FillRect(Rect);  // 先清除背景
        DrawText(Handle, PChar(Column.Field.AsString), Length(Column.Field.AsString), r, DT_WORDBREAK);  // 自动换行
      end;
    end;
      

  5.   

    我也曾经想过一些办法,但效果都不好,如果有好的别忘记我呀![email protected]
      

  6.   

    我决定用dbgrideh 但还是谢谢 allan2002(丸子)