我急需要知道一个问题，在StringGrid中，某一列中的行的数据太长了。我想分两行来显示。请问该怎么做？

在StringGrid的OnDrawCell事件中：procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol,
  ARow: Integer; Rect: TRect; State: TGridDrawState);
var
  S:string;
  R:TRect;
begin
  S:=StringGrid1.Cells[ACol, ARow];
  R:=Rect;
  with StringGrid1 do
    DrawText(Canvas.handle,PChar(S),-1,R,DT_WORDBREAK); //自动按单词换行
end;