diff options
author | Behrend Cornelius <bc@openoffice.org> | 2001-11-09 15:25:29 +0000 |
---|---|---|
committer | Behrend Cornelius <bc@openoffice.org> | 2001-11-09 15:25:29 +0000 |
commit | 71c2f14fdc8ff750d149530f0817769246df400c (patch) | |
tree | 83d56f20b05fd0dbc53789be4f771eac6c38e269 /wizards/source/formwizard/Language.xba | |
parent | f0374bd3fd337cac8c8532bd9cfabf82ccf260f3 (diff) |
#94490# TimeStampFields can now be displayed
Diffstat (limited to 'wizards/source/formwizard/Language.xba')
-rw-r--r-- | wizards/source/formwizard/Language.xba | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/wizards/source/formwizard/Language.xba b/wizards/source/formwizard/Language.xba index 9fd2f7273abe..9f37d078151a 100644 --- a/wizards/source/formwizard/Language.xba +++ b/wizards/source/formwizard/Language.xba @@ -89,9 +89,9 @@ Sub SetDialogLanguage () .hlnAlign.Label = GetResText(RID_FORM + 32) .hlnArrangements.Label = GetResText(RID_FORM + 35) - WizardTitle(1) = sMsgWizardName & ": " & GetResText(RID_FORM + 45) - WizardTitle(2) = sMsgWizardName & ": " & GetResText(RID_FORM + 46) - WizardTitle(3) = sMsgWizardName & ": " & 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) @@ -140,7 +140,6 @@ Sub InitializeWidthList() ' interpretiert wird. Darstellung über Numberformatter. Ist nicht konsistent über Datenbanken. ' außerdem dürften hier einige Treiber auch buggy sein. - ' Todo: Bugfix to Bug #88329 If Ubound(WidthList(),1) > 15 Then ReDim WidthList(15,4) End If @@ -200,7 +199,6 @@ Sub InitializeWidthList() WidthList(10,2) = False WidthList(10,3) = "TextField" - ' Todo: Sollte die Feldlänge vielleicht lieber aus den Metadaten ausgelesen werden? WidthList(11,0) = com.sun.star.sdbc.DataType.VARCHAR ' = 12; WidthList(11,1) = cTextBox WidthList(11,2) = True @@ -222,7 +220,6 @@ Sub InitializeWidthList() WidthList(14,3) = "TimeField" WidthList(15,0) = com.sun.star.sdbc.DataType.TIMESTAMP ' = 93; -' Todo: Dieses Control ist keine cDatebox sondern Kollektion aus Time und Datefield WidthList(15,1) = cDateBox WidthList(15,2) = False WidthList(15,3) = "DateField" @@ -248,7 +245,6 @@ Sub InitializeWidthList() ImgWidthList(3,3) = "ImageControl" ' Note: the following Fieldtypes cannot be presented -' Todo: This should be mentioned in the help 'ExcludeList(0) = com.sun.star.sdbc.DataType.SQLNULL 'ExcludeList(1) = com.sun.star.sdbc.DataType.OTHER 'ExcludeList(2) = com.sun.star.sdbc.DataType.OBJECT @@ -257,7 +253,7 @@ Sub InitializeWidthList() 'ExcludeList(5) = com.sun.star.sdbc.DataType.ARRAY 'ExcludeList(6) = com.sun.star.sdbc.DataType.CLOB 'ExcludeList(7) = com.sun.star.sdbc.DataType.REF - + oModelService(cLabel) = "com.sun.star.form.component.FixedText" oModelService(cTextBox) = "com.sun.star.form.component.TextField" oModelService(cCheckBox) = "com.sun.star.form.component.CheckBox" |