LibreOffice-Forum

Hallo,

Ein Formular direkt mit Fullscreen zu starten geht ja mit folgendem Makro:

SUB Fullscreen
   DIM oDispatcher As Object, Props(0) As New com.sun.star.beans.PropertyValue
   oDispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
   Props(0).Name = "FullScreen" : Props(0).Value = true
   oDispatcher.executeDispatch(ThisComponent.CurrentController.Frame, ".uno:FullScreen", "", 0, Props())
End SUB

Kann man das Formular auch maximiert starten, also mit Symbolleisten ?

Gruß Gundo

Im OpenOffice Forum gefunden:

F3K Total hat geschrieben:Hi, nicht ganz, aber fast:

Code: Alles auswählen

sub S_MaximizeFrame
    oframe=Thiscomponent.currentcontroller.frame
    owindow = oframe.getContainerWindow()
    	If Not IsNull(oWindow) Then
		oWindow.IsMaximized = True
		'oWindow.IsMinimized = True
    	End If
end sub

Gruß R

Danke.

Gruß Gundo

LibreOffice-Forum

[gelöst] Formular maximiert starten

[gelöst] Formular maximiert starten

Re: Formular maximiert starten