#93570# several changes

This commit is contained in:
Behrend Cornelius 2001-11-01 15:59:13 +00:00
parent 17b4682dfe
commit 7fdb02c903
3 changed files with 9 additions and 8 deletions

View file

@ -310,7 +310,8 @@ Dim bLinkExists as Boolean
Dim i as Integer
Dim sBaseBookmarkName as String
oMasterKey = GetRegistryKeyContent("org.openoffice.Office.TypeDetection/")
oFilters() = oMasterKey.Filters
' Todo: Hier "Filters" als key angeben
oFilters() = oMasterKey.Types
FilterNames(0,0) = oFilters.GetByName("writer_StarOffice_XML_Writer").UIName
FilterNames(0,1) = "*.sxw"
FilterNames(0,2) = ""

View file

@ -89,9 +89,9 @@ Sub SetDialogLanguage ()
.hlnAlign.Label = GetResText(RID_FORM + 32)
.hlnArrangements.Label = GetResText(RID_FORM + 35)
WizardTitle(1) = GetResText(RID_FORM + 45)
WizardTitle(2) = GetResText(RID_FORM + 46)
WizardTitle(3) = GetResText(RID_FORM + 47)
WizardTitle(1) = sMsgWizardName & ": " & GetResText(RID_FORM + 45)
WizardTitle(2) = sMsgWizardName & ": " & GetResText(RID_FORM + 46)
WizardTitle(3) = sMsgWizardName & ": " & GetResText(RID_FORM + 47)
.hlnBinaries.Label = GetResText(RID_FORM + 50)
.optIgnoreBinaries.Label = GetResText(RID_FORM + 51)

View file

@ -2,9 +2,9 @@
*
* $RCSfile: dbwizres.src,v $
*
* $Revision: 1.17 $
* $Revision: 1.18 $
*
* last change: $Author: kz $ $Date: 2001-07-20 21:22:23 $
* last change: $Author: bc $ $Date: 2001-11-01 16:59:13 $
*
* The Contents of this file are made available subject to the terms of
* either of the following licenses
@ -1154,8 +1154,8 @@ String RID_DB_GROUP_WIZARD_START + 23
String RID_DB_FORM_WIZARD_START + 0
{
Text = "AutoPilot Formulare";
Text [ english_us ] = "AutoPilot Forms";
Text = "AutoPilot Formular";
Text [ english_us ] = "AutoPilot Form";
Text[ portuguese ] = "AutoPiloto - Formulários";
Text[ russian ] = "Àâòîïèëîò ôîðìóëÿðîâ";
Text[ dutch ] = "AutoPiloot Formulieren";