Wie schließe ich ein Dokument ?

[Tobi_Fr]

Hi,

ich bräuchte Hilfe beim Dokument schließen mit StarBasic 8 Beta. Ich öffne ein Dokument ganz normal per Mausklick und möchte das dann per Makro wieder schließen. Weiß jemand wie das geht ?
Stichwort: ThisComponent, Close ?

danke
tobi

[Stephan]

Ich habe mich noch nicht mit den Veränderungen in StarBasic 8 beschäftigt. Derzeitig (SO7) geht:

Code: Alles auswählen

ThisComponent.Close(True)

Gruß
Stephan

[Tobi_Fr]

ich bekomme folgenden Fehler, da ich wie unten ersichtlich zwei Dokumente öffne:

Runtime Error !
Programm C:\....\soffice.bin
abnormal program termination

-------------------------------------------

Sub Main

Dim Doc As Object
dim myDoc as Object
Dim Url As String
Dim Dummy()

Url = "file:///M:/test"
Doc = StarDesktop.loadComponentFromURL(Url, "_blank", 0, Dummy())

'Close "test" Document
Doc.close(true)

myDoc = ThisComponent

'Close first Document
myDoc.close(true)

endif

end sub

-------------------------------------------------------------------

Ich öffne also eine Vorlage "ganz normal mit der Maus" aus dieser wird ein zweites Dokument geöffnet. Und das Schließen von beiden ist mein Problem...

Danke für jede Hilfe

[Frank Lauer]

Hallo Tobi_FR

ich hab deinen Code mal unter OOo 1.1.2 getestet. Bei mir läuft alles problemlos (nach dem ich das End If gelöscht habe). Du scheinst da noch einen kleinen Bug in der Beta entdeckt zu haben.