引言: 請教各位先進 我利用 TStringGrid 元件存放一陣列值, 假設StringGrid "列"欄位固定, 那陣列值超出部分如何跳到下一行呢 < face="Verdana, Arial, Helvetica"> ptkjason 你好

  看不大懂你的問題耶!先試試以下方式，看是不是你要的?若不是的話麻煩你
再詳細說明一下你的問題。    假設有個動態陣列 A : Array Of String; 及StringGrid, ColCOunt設為 ５    Var
  i ,c,r: Integer;
Begin
  With StringGrid1 Do Begin
    If (Length(A) mod ColCount) =0 Then Begin
      RowCount := (Length(A) Div ColCount);
    End Else Begin
      RowCount := (Length(A) Div ColCount) 1;
    End;
    c:=0;
    r := 0 ;
    For i:=Low(A) To High(A) Do Begin
      Cells[c,r] := A[i] ;
      Inc(c);
      If c=(ColCount-1) Then Begin
        c:=0;
        Inc(r);
      End;
    End;
  End;
End;    

_______________________________________ 深藍的魚，祝您好運..........連連