Changed GEEvent to inherit from AGEEvent and TObject.