Misc.xba (74cbd1f1) | Misc.xba (d219bd27) |
---|---|
1<?xml version="1.0" encoding="UTF-8"?> 2<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd"> 3<!--*********************************************************** 4 * 5 * Licensed to the Apache Software Foundation (ASF) under one 6 * or more contributor license agreements. See the NOTICE file 7 * distributed with this work for additional information 8 * regarding copyright ownership. The ASF licenses this file --- 119 unchanged lines hidden (view full) --- 128 129Function GetProductname() as String 130Dim oProdNameAccess as Object 131Dim sVersion as String 132Dim sProdName as String 133 oProdNameAccess = GetRegistryKeyContent("org.openoffice.Setup/Product") 134 sProdName = oProdNameAccess.getByName("ooName") 135 sVersion = oProdNameAccess.getByName("ooSetupVersion") | 1<?xml version="1.0" encoding="UTF-8"?> 2<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd"> 3<!--*********************************************************** 4 * 5 * Licensed to the Apache Software Foundation (ASF) under one 6 * or more contributor license agreements. See the NOTICE file 7 * distributed with this work for additional information 8 * regarding copyright ownership. The ASF licenses this file --- 119 unchanged lines hidden (view full) --- 128 129Function GetProductname() as String 130Dim oProdNameAccess as Object 131Dim sVersion as String 132Dim sProdName as String 133 oProdNameAccess = GetRegistryKeyContent("org.openoffice.Setup/Product") 134 sProdName = oProdNameAccess.getByName("ooName") 135 sVersion = oProdNameAccess.getByName("ooSetupVersion") |
136 GetProductName = sProdName & sVersion | 136 GetProductName = sProdName & " " & sVersion |
137End Function 138 139 140' Opens a Document, checks beforehand, whether it has to be loaded 141' or whether it is already on the desktop. 142' If the parameter bDisposable is set to False then then returned document 143' should not be disposed afterwards, because it is already opened. 144Function OpenDocument(DocPath as String, Args(), Optional bDisposable as Boolean) --- 693 unchanged lines hidden --- | 137End Function 138 139 140' Opens a Document, checks beforehand, whether it has to be loaded 141' or whether it is already on the desktop. 142' If the parameter bDisposable is set to False then then returned document 143' should not be disposed afterwards, because it is already opened. 144Function OpenDocument(DocPath as String, Args(), Optional bDisposable as Boolean) --- 693 unchanged lines hidden --- |