yball(yball) (  ) ,你UP什么?

解决方案 »

  1.   

    delphi不是建议不要使用OnDrawDataCell吗?OnDrawDataCell只是提供对以前版本的兼容,还是用OnDrawColumnCell吧!
      

  2.   

    procedure ttt.GridDGDrawColumnCell(Sender: TObject; const Rect: TRect;
      DataCol: Integer; Column: TColumnEh; State: TGridDrawState);
    begin
      if column=Griddg.Columns[5] then   Griddg.Canvas.TextOut(Rect.left, Rect.top, '555');
    end;
    为什么总是在抖动,是不是自己又触发了自己?怎么解决?
      

  3.   

    if Column.Index=0 then
         begin
              DBGrid1.Canvas.Brush.Color:=clInfoBk;
              DBGrid1.Canvas.FillRect(Rect);
              DBGrid1.Canvas.Pen.Color:=clBlack;
              DBGrid1.Canvas.TextOut(Rect.Left+2,Rect.Top+2,'555');
         end;
      

  4.   

    会抖动吗?
    我用的是DrawText没有任何问题啊