summaryrefslogtreecommitdiff
path: root/wizards/source/formwizard/FormWizard.xba
diff options
context:
space:
mode:
authorBehrend Cornelius <bc@openoffice.org>2001-08-21 15:37:49 +0000
committerBehrend Cornelius <bc@openoffice.org>2001-08-21 15:37:49 +0000
commit524d50ec2c4b3d149c6060dba1f2269d55991a9d (patch)
tree8af7fd614f4d11015b697ba5556e73c266d4be42 /wizards/source/formwizard/FormWizard.xba
parent5d08ee1cb07353a598350723d4c94141fa8d143f (diff)
#91236# Fieldwidths modified
Diffstat (limited to 'wizards/source/formwizard/FormWizard.xba')
-rw-r--r--wizards/source/formwizard/FormWizard.xba11
1 files changed, 2 insertions, 9 deletions
diff --git a/wizards/source/formwizard/FormWizard.xba b/wizards/source/formwizard/FormWizard.xba
index 34fcdfa06657..59fbfbe63990 100644
--- a/wizards/source/formwizard/FormWizard.xba
+++ b/wizards/source/formwizard/FormWizard.xba
@@ -244,7 +244,7 @@ Sub InitializeLayoutSettings()
ToggleAlignGroup(bControlsAreCreated)
ArrangeControls()
If OldAlignMode &lt;&gt; 0 Then
- DlgFormDB.GetControl(&quot;cmdAlign&quot; &amp; OldAlignmode).Model.State = 0
+ DlgFormDB.GetControl(&quot;optAlign2&quot;).Model.State = 0
End If
End Sub
@@ -276,11 +276,4 @@ Dim oFilters() as Object
If bDocIsStored Then
DlgFormDB.EndExecute()
End If
-End Sub
-
-
-Sub HelperDialog()
-&apos;Todo: The String &quot;start&quot; can be replaced by a HelpIndex
- StarDesktop.LoadComponentfromUrl(&quot;vnd.sun.star.help://&quot; &amp; sDocType &amp; &quot;/start&quot;, &quot;_OFFICE_HELP&quot;, 64, NoArgs())
-End Sub
-</script:module> \ No newline at end of file
+End Sub</script:module> \ No newline at end of file