...and for me as well
(produces empty window ~ 55mm x 55mm
with title reading "LibreOffice 3.6").
jdh
____________________________________________
On 01/29/2013 03:33 PM, Leif Lodahl wrote:
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 <sos@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%2Bhelp@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+help@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
Context
Privacy Policy |
Impressum (Legal Info) |
Copyright information: Unless otherwise specified, all text and images
on this website are licensed under the
Creative Commons Attribution-Share Alike 3.0 License.
This does not include the source code of LibreOffice, which is
licensed under the Mozilla Public License (
MPLv2).
"LibreOffice" and "The Document Foundation" are
registered trademarks of their corresponding registered owners or are
in actual use as trademarks in one or more countries. Their respective
logos and icons are also subject to international copyright laws. Use
thereof is explained in our
trademark policy.