ActiveX: MS Testcontainer doesn’t close Delphi ActiveX

MS Testcontainer doesn’t close whith Delphi ActiveX.
Same problem in MS C++

Solution:
– look in the source AxCtrls.pas
– look at the “function TActiveXControl.ObjQueryInterface(”
– there’s a work-a-round for a bug in MS Access 97 included.
if you comment this part out the delphi ActiveX works like it should with C++

[code lang=”delphi”] if IsEqualGuid(IID, IOleLink) then
begin
// Work around for an MS Access 97 bug that requires IOleLink
// to be stubbed.
{ comment out for work with c++ / testcontainer
Pointer(Obj) := nil;
IOleLink(Obj) := TOleLinkStub.Create(Self);
}
end
[/code]

[tags]Delphi, Misc, ActiveX[/tags]