Strange Problem with an OCX Control

[Thaddy]

make the message private or figure out my email address,which is simply my real name @ my real name dot com/nl/org. Thaddy is my real name... I am too old to have knick names..

[RAW]

Some say that name comes from the old greeks and means something like "Gift Of God"... maybe they got it wrong and it means "Gift Of Code" ...

[JochenKauz]

ok, one step further..

As I thought there is perhaps a problem in the generated DTB.
As you can see in the DTB I posted, this OCX has only a dispinterface, no interface.

Codetools completion did always throw an exception (default dispinterface ancestor IDispatch not found), if I use it on iwMapViewCtrl1.OleServer. This exception is raised from "components\codetools\finddeclarationtool.pas".
I changed this in the DTB:

Code: Pascal  [Select][+][-]

1. Type
2.  _DiwMapViewCtrl = dispinterface;
3.  _DiwMapViewCtrlEvents = dispinterface;
4. //Map CoClass to its default interface
5.  iwMapViewCtrl = _DiwMapViewCtrl;
6. //records, unions, aliases
7. //interface declarations
8. // _DiwMapViewCtrl : Dispatch-Schnittstelle für iwMapView Control
9. _DiwMapViewCtrl = interface(IDispatch)
10.    ['{357CEE48-2FD4-4311-9E92-1050A4429D8C}']
11.     // ZoomIn :  
12.    function ZoomIn:Integer;dispid 101;
13. ...
14.  

to this:

Code: Pascal  [Select][+][-]

1. Type
2.  _DiwMapViewCtrl = interface;
3.  _DiwMapViewCtrlDisp = dispinterface;
4.  _DiwMapViewCtrlEvents = dispinterface;
5. //Map CoClass to its default interface
6.  iwMapViewCtrl = _DiwMapViewCtrl;
7. //records, unions, aliases
8. //interface declarations
9. // _DiwMapViewCtrl : Dispatch-Schnittstelle für iwMapView Control
10. _DiwMapViewCtrl = interface(IDispatch)
11.    ['{357CEE48-2FD4-4311-9E92-1050A4429D8C}']
12.   end;
13.  
14. _DiwMapViewCtrlDisp = dispinterface
15.    ['{357CEE48-2FD4-4311-9E92-1050A4429D8C}']
16.     // ZoomIn :  
17.    function ZoomIn:Integer;dispid 101;
18. ...

With this change codetools did not throw an exception and display all function/procedure/property correct.

But after the compile it always throws an EOLeSysError, if I access a property.

So I have to asked this question again. Does Lazarus/FPC support OCX Controls with dispinterface only?