How to get lg Icons in MDI TabWorkspace

Hello,

Strange, but.TabWorkspace.PaintManager.SetIconSize 32, 32 works for me.Pleaes try it with our MDI sample, do you see large icons?Do you have last 9.80/9.81 ActiveX?

I say:

Yes I do have 9.81 and I used the MDI sample, I based my application on it.  

What I need is the equivlent of the following code but not for the mdi-children, for the main MDI itself, can you do that?

'VB sample from TabManager.frmProperties:

Private Sub Form_Load()

    Set TabControl.Icons = imlTabControl.Icons
   
    Set pageTabWorkspace = New pageTabWorkspace
    Set pageTabWorkspace.frmProperties = Me
    TabControl.InsertItem 0, "TabWorkspace", pageTabWorkspace.hwnd, 1
   
    Set pageTabControl = New pageTabControl
    Set pageTabControl.frmProperties = Me
    TabControl.InsertItem 1, "TabControl", pageTabControl.hwnd, 1
   
    Set pageDockingPane = New pageDockingPane
    Set pageDockingPane.frmProperties = Me
    TabControl.InsertItem 2, "DockingPane", pageDockingPane.hwnd, 1
   
    Set pageAutoHidePanel = New pageAutoHidePanel
    Set pageAutoHidePanel.frmProperties = Me
    TabControl.InsertItem 3, "AutoHidePanel", pageAutoHidePanel.hwnd, 1
   
    Set pageMargins = New pageMargins
    Set pageMargins.frmProperties = Me
    TabControl.InsertItem 4, "Margins", pageMargins.hwnd, 1
   
    pageTabWorkspace.RefreshPaintManager
    pageTabControl.RefreshPaintManager
    pageDockingPane.RefreshPaintManager
    pageAutoHidePanel.RefreshPaintManager
  
End Sub