换一个stringgrid吧,推荐Tadvstringgrid用完后觉得不想用其他的了,www.51delphi.com上有下载,很不错的grid,你说得功能在他demo中都有啊

解决方案 »

  1.   

    Tadvstringgrid打印很烦的.........  动态改变列宽及行高可以通过属性设置的。
      多个cell就.........不过有个苯方法:动态的画个edit上去,把各个cells
      的内容写到edit中就可以了!
      

  2.   

    试一试
      
    将stringgrid的defaultdrawing属性改为false,然后:  
      procedure  TForm1.StringGrid1DrawCell(Sender:  TObject;  ACol,  ARow:  Integer;  
      Rect:  TRect;  State:  TGridDrawState);  
      begin  
      if  (acol=1)  and  (arow=1)  then  
      rect.Bottom:=rect.Bottom+rect.Bottom-rect.Top;  
      if  not((acol=1)  and  (arow=2))  then  
      begin  
      stringgrid1.Canvas.FillRect(Rect);  
      stringgrid1.canvas.textout(rect.left,rect.top+18,StringGrid1.cells[acol,arow]);  
      end;  
      end;