[急急急急急急]dbgrideh的buttonstyle设置了cbsEllipsis之后，怎么点击打开一个窗口呢

Question

这个帖子以前有人问过，可是没有解释清楚，麻烦哪位大虾给些指教

Answer 1

在
DBGird的
OnEditButtonClick中写procedure TMainForm.DBGrid1EditButtonClick(Sender: TObject);
begin
  ShowMessage(IntToStr(DBGrid1.SelectedIndex)); 
end;

Answer 2

procedure TForm1.DBGridEh1Columns0EditButtonClick(Sender: TObject;
  var Handled: Boolean);
begin
  if not Assigned(Form1) then
    Form1:=TForm.Create(self);
  try
    Form1.ShowModal;
  finally
    FreeAndNil(Form1);
  end;
end;