summaryrefslogtreecommitdiff
path: root/wizards/source/formwizard/Language.xba
diff options
context:
space:
mode:
authorBehrend Cornelius <bc@openoffice.org>2001-06-22 13:25:07 +0000
committerBehrend Cornelius <bc@openoffice.org>2001-06-22 13:25:07 +0000
commit29190190d9bb3dfa025a5327fe80bf640c953f85 (patch)
tree9d579c46ad0a7e44c20d7c392baeb732ba9c7879 /wizards/source/formwizard/Language.xba
parentbc5c68ab1d6185a4850da4349d5cbce23f50cd5a (diff)
#88615# Storing improved, finetuning
Diffstat (limited to 'wizards/source/formwizard/Language.xba')
-rw-r--r--wizards/source/formwizard/Language.xba16
1 files changed, 12 insertions, 4 deletions
diff --git a/wizards/source/formwizard/Language.xba b/wizards/source/formwizard/Language.xba
index 22d41c8b6387..ae424e735fc7 100644
--- a/wizards/source/formwizard/Language.xba
+++ b/wizards/source/formwizard/Language.xba
@@ -1,6 +1,8 @@
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
-<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Language" script:language="StarBasic">
+<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Language" script:language="StarBasic">Option Explicit
+
+
Global Const RID_COMMON = 1000
Global Const RID_FORM = 2200
@@ -36,6 +38,8 @@ Public sReady as String
Public sMsgNoConnection as String
Public sReduceDialog as String
Public sHeightenDialog as String
+Public sWriterFilterName as String
+Public sWriterTemplateFiltername as String
Sub LoadLanguage ()
@@ -130,6 +134,9 @@ Sub SetDialogLanguage ()
.cmdSwitchHeight.HelpText = sReduceDialog
.cmdSwitchHeight.Label = CHR(9653)
+
+ sWriterFilterName = GetResText(RID_FORM + 70)
+ sWriterTemplateFilterName = GetResText(RID_FORM + 71)
End With
End Sub
@@ -235,10 +242,11 @@ Sub InitializeWidthList()
&apos; Todo: Die folgenden Felder auffüllen!
WidthList(15,0) = com.sun.star.sdbc.DataType.TIMESTAMP &apos; = 93;
-&apos; WidthList(15,1) = Datum-Zeit Feld
-&apos; WidthList(15,2) =
+ WidthList(15,1) = 20
+&apos; Todo: Dieses Control ist keine cDatebox sondern Kollektion aus Time und Datefield
+ WidthList(15,2) = cDateBox
WidthList(15,3) = False
-&apos; WidthList(15,4) =
+ WidthList(15,4) = &quot;DateField&quot;
ImgWidthList(0,0) = com.sun.star.sdbc.DataType.BINARY &apos; = -2;