diff options
author | Behrend Cornelius <bc@openoffice.org> | 2002-07-10 14:32:07 +0000 |
---|---|---|
committer | Behrend Cornelius <bc@openoffice.org> | 2002-07-10 14:32:07 +0000 |
commit | 0c5108d047eaf8054492fa65133e6c708ffaa055 (patch) | |
tree | e07ce4181642cc67838e4ea6a3f32efff812db26 /wizards/source/formwizard/Language.xba | |
parent | d7ac1dd77234eb241e5867f4313c21aa4f21823d (diff) |
#100987# dialog now created later
Diffstat (limited to 'wizards/source/formwizard/Language.xba')
-rw-r--r-- | wizards/source/formwizard/Language.xba | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/wizards/source/formwizard/Language.xba b/wizards/source/formwizard/Language.xba index 0a9ca054e988..853e35541eec 100644 --- a/wizards/source/formwizard/Language.xba +++ b/wizards/source/formwizard/Language.xba @@ -13,7 +13,7 @@ Public BasicLabelDiffHeight as Long Public WizardTitle(1 To 3) as String Public DlgFormDB as Object -Public oDialogModel as Object +Public DialogModel as Object Dim sMsgWizardName as String Dim sMsgErrMsg as String @@ -57,17 +57,16 @@ Sub LoadLanguage () sTimeAppendix = GetResText(RID_FORM + 5) sReady = GetResText(RID_COMMON + 0) - SetDialogLanguage() End Sub Sub SetDialogLanguage () DlgFormDB = LoadDialog("FormWizard", "DlgFormDB") - oDialogModel = DlgFormDB.Model + DialogModel = DlgFormDB.Model Dim FNameAddOn as String - With oDialogModel + With DialogModel .cmdCancel.Label = GetResText(RID_COMMON + 1) .cmdBack.Label = GetResText(RID_COMMON + 2) .cmdHelp.Label = GetResText(RID_COMMON + 20) |