怎么在DBGridEh.pas中添加事件和方法？

Question

我想实现下面两个功能：
procedure Tcgdd.DBGridEh1SetEditText(Sender: TObject; ACol, ARow: Integer;
  const Value: string);
begin
  Etxt := Value;
end;
procedure Tcgdd.DBGridEh1GetEditText(Sender: TObject; ACol, ARow: Integer;
  var Value: string);
begin
  ECol := ACol;
  Ytxt := Value;
end;
详情请看http://topic.csdn.net/u/20100628/20/0609c136-ddff-4c87-a2fb-54fa06564898.html?2080053874，   但DBGridEh又没有SetEditText和GetEditText的事件，有高手说可以在打开DBGridEh.pas添加这两个事件和方法，然后重新编译。具体怎么实现？谢谢！！

Answer 1

我打开DBGridEh.pas后，在代码编辑框【Published】段中添加事件：
property OnGetEditText;
property OnSetEditText;
但是不知怎么添加方法？谢谢！！

Answer 2

直接对grideh.datasource.dataset操作就可以。

Answer 3

http://www.pudn.com/downloads49/sourcecode/delphi_control/detail167368.html
有一个GridEh1.54版的，包含SetEditText和GetEditText的属性事件，但是编译不了啊