GetSize of IOleObject in ActiveX Control

[radek08]

Hi,

Im writing a Function to show tooltips for all containers in a ActiveX Control.
Any suggestions upon how to get the size of a IOleObject?
Tried to get the Top,Left,Width and Height property, but they are unknown.

Any suggestions on Interface that could help me...

Dim pUnk As Object
'IContainer
sdf = CType(tmp, IOleContainer)
'Enumerate through EMBEDDED objects
sdf.EnumObjects(tagOLECONTF.EMBEDDINGS, o) ')
Dim pceltFetched As Integer = 0
Do While o.Next(1, pUnk, pceltFetched) = 0

If IsNothing(pUnk) Then

Exit Do

End If

'TODO : Get size of each component

Loop

/R