diff options
Diffstat (limited to 'packages/winunits-base')
| -rw-r--r-- | packages/winunits-base/src/comobj.pp | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/packages/winunits-base/src/comobj.pp b/packages/winunits-base/src/comobj.pp index 358f7abc38..31e9c5f138 100644 --- a/packages/winunits-base/src/comobj.pp +++ b/packages/winunits-base/src/comobj.pp @@ -28,6 +28,10 @@ unit comobj; type EOleError = class(Exception); + + // apparantly used by axctrls. + // http://lazarus.freepascal.org/index.php/topic,11612.0.html + TConnectEvent = procedure(const Sink: IUnknown; Connecting: Boolean) of object; EOleSysError = class(EOleError) private |