It works for me (I see an emty grey window but not with a title).
Running LibreOffice 4.0.0.2 on 32bit deb_Linux.
Hopes this can help ;-)
Chhers,
Leif Lodahl
2013/1/29 Fernand Vanrie <s...@pmgroup.be>
> We uses the Basic codelines below to make Modeless Dialogs, sinds 4.0 we
> end up with a non-visible window
> is this a Windows only problem or a more general regression due to changes
> in the API ?,
> it was working until 3.6.4 Windows
>
> Greetz
>
> Fernand
>
> Sub Main
> oDoc = ThisComponent
> oParentFrame = oDoc.CurrentController.Frame
> oPeer = oParentFrame.ContainerWindow
> oToolkit = oPeer.Toolkit
>
> oWindow = CreateNewWindow(oToolkit,**oPeer,150,150,200,200)
> oFrame = CreateUnoService("com.sun.**star.frame.Frame")
> oFrame.initialize(oWindow)
> oFrame.setCreator(**oParentFrame)
> oFrame.setName("NewFrame")
> oFrame.Title = "New Frame"
>
> oParentFrame.getFrames().**append(oFrame)
>
> oWindow.setVisible(True)
> End Sub
>
>
> Function CreateNewWindow( _
> oToolkit,oParent,nX,nY,nWidth,**nHeight) As Object
> aRect = CreateUnoStruct("com.sun.star.**awt.Rectangle")
> With aRect
> .X = nX
> .Y = nY
> .Width = nWidth
> .Height = nHeight
> End With
> aWinDesc = CreateUnoStruct("com.sun.star.**awt.WindowDescriptor")
> With aWinDesc
> .Type = com.sun.star.awt.WindowClass.**TOP
> .WindowServiceName = "dialog"
> .ParentIndex = -1
> .Bounds = aRect
> .Parent = oParent
> .WindowAttributes = _
> com.sun.star.awt.**WindowAttribute.MOVEABLE + _
> com.sun.star.awt.**WindowAttribute.CLOSEABLE
> End With
> CreateNewWindow = oToolkit.createWindow(**aWinDesc)
> End Function
>
>
> --
> For unsubscribe instructions e-mail to: users+help@global.libreoffice.**
> org <users%2bh...@global.libreoffice.org>
> Problems? http://www.libreoffice.org/**get-help/mailing-lists/how-to-**
> unsubscribe/<http://www.libreoffice.org/get-help/mailing-lists/how-to-unsubscribe/>
> Posting guidelines + more: http://wiki.**documentfoundation.org/**
> Netiquette <http://wiki.documentfoundation.org/Netiquette>
> List archive:
> http://listarchives.**libreoffice.org/global/users/<http://listarchives.libreoffice.org/global/users/>
> All messages sent to this list will be publicly archived and cannot be
> deleted
>
>
--
For unsubscribe instructions e-mail to: users+h...@global.libreoffice.org
Problems? http://www.libreoffice.org/get-help/mailing-lists/how-to-unsubscribe/
Posting guidelines + more: http://wiki.documentfoundation.org/Netiquette
List archive: http://listarchives.libreoffice.org/global/users/
All messages sent to this list will be publicly archived and cannot be deleted
