各位大大好： 我在DBGrid之EditButtonClick，寫了一個觸發程式，當游標進入某一個欄位（如第一個）時，開啟某一個視窗，剛欄位的ButtonStyle設為cbsEllipsis、、，一切都OK、、、。 但是在GRID中，欄位是可以根據使用者的喜好而移動、、此時的欄位就已經不是原來的DBGrid3.SelectedIndex = 2、、、所以也無法把另一個視窗SHOW出、、、請問我要如何做，才可以讓使用者移動了GRID之欄位後、、該欄位原本的cbsEllipsis，一樣可以維持運作呢？？ 感謝 procedure Tcompu.DBGrid3EditButtonClick(Sender: TObject); //var aa1:string; begin aa1:=DBGrid3.Columns[1].Field.AsString; //公用變數 //有問題，如果欄位移動的話，就抓不到了 if DBGrid3.SelectedIndex = 2 then compu_01.Show; end;

Hi kkym,    使用下列方法試試：

procedure Tcompu.DBGrid3EditButtonClick(Sender: TObject);
begin
  if DBGrid3.SelectedField.FieldName = 'YourFieldName' then
    compu_01.Show;
end;

如此不管 User 如何移動 DBGrid 欄位，皆無影響 發表人 -

------
Fishman

引言: //有問題，如果欄位移動的話，就抓不到了 if DBGrid3.SelectedIndex = 2 then compu_01.Show; end;

if DBGrid3.Fields[DBGrid3.SelectedIndex].FieldName='您指定的欄位名' then compu_01.Show;

謝謝兩位兄台、、 因為Fishman兄已是五星級、、、所以我給chengxf兄得分。 Fishman兄，不會介意吧！？

Hi kkym,    當然不介意，重點是你可以得到你要的答案，同時也鼓勵 chengxf 有正確的 Solution，這是一個好主意！     ---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

謝謝kkym要給分,也謝謝fishman不介意，但是我覺得fishman的語句更好，使我也學到新的東西，請給分給fishman，我是誠心的。