Date: prev next · Thread: first prev next last
2013 Archives by date, by thread · List index


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 <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.