引言: 我想在StringGrid中複選Cell, 並同時將它們的內容改成一樣 有辦法做到這樣嗎？ 我有試過TAdvStringGrid這元件 可是它好像也沒辦法做到？

void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
  if(Key==0x0D)  // 按下 Enter
  {
    for(int i=Grid->Selection.Left;i<=Grid->Selection.Right;i  )
      for(int j=Grid->Selection.Top;j<=Grid->Selection.Bottom;j  )
        Grid->Cells[i][j]=Edit1->Text;
  }
}

引言: 您可以在表單上放一個 TEdit 命名為 Edit1 再放一個 TStringGrid 命名為 Grid 在 Edit1 的 OnKyePress 事件中寫如下的 code

void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
  if(Key==0x0D)  // 按下 Enter
  {
    for(int i=Grid->Selection.Left;i<=Grid->Selection.Right;i  )
      for(int j=Grid->Selection.Top;j<=Grid->Selection.Bottom;j  )
        Grid->Cells[i][j]=Edit1->Text;
  }
}

執行時，先選 Grid 內的範圍，再 Edit1 內輸入文字，按下 Enter ，則所選到的範圍內的格子，就會是 Edit1 的文字內容。 沒空更新的網頁... http://dllee.ktop.com.tw C及指標教學,計算機概論,資訊管理導論... http://dllee.adsldns.org 介紹Shells,LiteStep,GeoShell....

感謝dllee兄解答 將您這套寫法用在TAdvStringGrid中真是威力強大啊...............