怎样捕捉DBGridEh行高改变事件?(100分)

如题,当用户用鼠标改变行高时,我想将当前行高显示出来

大概就这意思？
procedure TForm1.FormCreate(Sender: TObject);
begin
DBGridEh1.RowSizingAllowed:=True;
label1.Caption:='RowHeight = '+ inttostr(DBGridEh1.rowheight);
end;

procedure TForm1.DBGridEh1DrawDataCell(Sender: TObject;
const Rect: TRect;
Field: TField;
State: TGridDrawState);
begin
label1.Caption:='RowHeight = '+ inttostr(DBGridEh1.rowheight);
end;

可以的