dear all 我在ListView元件上內容插入一Column head ,而其空出來的對應的格子內容,要如何輸入資料(由上到下的資料)在這個某個列下的資料 procedure TForm1.Button1Click(Sender: TObject); begin ListView1.Columns.Insert(3); ListView1.Columns.Items[3].Caption:='test'; 如何在新增的欄位 (由上到下) 地方輸入資料 end;

  for i:=0 to ListView1.Items.Count-1 do
    ListView1.items[i].SubItems.Insert(2,'test');

引言:

  for i:=0 to ListView1.Items.Count-1 do
    ListView1.items[i].SubItems.Insert(2,'test');

但是這樣,資料無法指到我想指到的位置,因為執行的結果最後一個攔位(由上到下)整個資料,會被擠到新增的位置.新增的資料會被往後娜一個位置,造成資料顯示方式與預期不同.一般預期事,我插入一個新攔位(由上到下稱為Column),接著在在新攔位輸入資料,照道理來說,資料很單純在所指地的地方出現.但是事實上並不如此,新輸入資料那一Column,整個往右移,而最後一筆Column資料,去出現在新增的Column.所以有問題

那就先用add, 再改index吧

procedure TForm1.InsertsubItem(id: integer);
var i:integer;
  s:string;
begin
  with ListView1 do begin
    with columns.add do
      caption:='new';
    for i:=0 to items.Count-1 do
      items[i].SubItems.add('insert' inttostr(id));
    columns[columns.Count-1].Index:=id;  //change to 指定位置
  end;
end;

首先要感謝你的幫忙,但是,程式執行還是有問題,當我再同一位置再一次差入時,所顯示的資料並沒有在預期的地方顯示 ,而是接著在最後端顯示,所以還是有問題,但是還是感謝你的幫忙

謝謝你的幫忙,我了解問題出在,Column 的index部分,謝謝你的幫忙,萬分感謝