Leif,
Thanks, the grey window can now have a container with controls who acts
like a dialog.
so Linux is OK,
it helps and it points to Windows :-)
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 <[email protected]>
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: [email protected].**
org <users%[email protected]>
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: [email protected]
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
