各位大大： 請問一下如何讓TStringGrid在插入資料時，將新資料放在第一行，其他的資料則順延往下一行，請問有什麼方法可以做到？？

用DBGrid可能較好處理! Delphi follower

------
Delphi

用資料庫索引功能..Tquery的話SQL語法就使用 "DESC"關鍵字 TTable的話，就直接建立一個反方向的索引，並且使用這個索引檔.

抱歉..我剛看到最後一個人的回復，看到DBGrid.. 以為原作者要問DBGrid顯示. 文張貼出去後才看到第一篇文章原作者的文章， 如果TStringGrid 的話，就用一個迴圈，把每一行(N)內容往 N 1 行 copy, 並且把第一行清空這樣就可以在第一行輸入資料了. (希望這個方法不會太笨)

我曾用了下列的方法嘗試的解決可是會程式當掉 請各位大大幫我看看為什麼吧～ var cnt,i : integer; begin StringGrid1.RowCount := StringGrid1.RowCount 1; cnt := StringGrid1.RowCount; while (i >= 2 ) do begin StringGrid1.Cells[0,i] := StringGrid1.Cells[0,i-1]; StringGrid1.Cells[1,i] := StringGrid1.Cells[1,i-1]; StringGrid1.Cells[2,i] := StringGrid1.Cells[2,i-1]; StringGrid1.Cells[3,i] := StringGrid1.Cells[3,i-1]; i := i - 1; end; end;

引言: var cnt,i : integer; begin StringGrid1.RowCount := StringGrid1.RowCount 1; i := StringGrid1.RowCount-1; while (i >= 1 ) do begin StringGrid1.Cells[0,i] := StringGrid1.Cells[0,i-1]; StringGrid1.Cells[1,i] := StringGrid1.Cells[1,i-1]; StringGrid1.Cells[2,i] := StringGrid1.Cells[2,i-1]; StringGrid1.Cells[3,i] := StringGrid1.Cells[3,i-1]; i := i - 1; end; end;