diff options
| author | marco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2010-12-31 15:50:19 +0000 |
|---|---|---|
| committer | marco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2010-12-31 15:50:19 +0000 |
| commit | 724dfaca4c2dd9e06eeeb6df241efce69b4f7fd6 (patch) | |
| tree | be7985b5aeb5d5094c4bca5aebeec49598411d4c /packages/winunits-base/src | |
| parent | acb74ce4fab5036821f66792604e1750b7298c1e (diff) | |
| download | fpc-724dfaca4c2dd9e06eeeb6df241efce69b4f7fd6.tar.gz | |
* tconnectevent added to comobj
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@16673 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/winunits-base/src')
| -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 |