MemoControl SpaceAbove bug?

[rgesner]

When a MemoControl follows a RadioGroup with .Spacing = afvManual , it overlaps the RadioGroup, regardless of the SpaceAbove setting.

Set RG = SigDlg.AddRadioGroupControl
with RG
.Caption = “Choose Signature to view or edit, then select &View/Edit button:”
.Columns = 3
.Height = 48
.Items.Add(“Personal”)
.Items.Add(“Casual”)
.Items.Add(“Disclaimer”)
.ItemIndex = 1
end with

Set MemoControl = SigDlg.AddMemoControl
with MemoControl
.Caption = ” “
.Text = “Here is some text….”
.ScrollBars = fssBoth ‘fssVertical is buggy
.CaptionPosition = afvLeft
.CaptionAlign = ftaRightJustify
.Spacing = afvManual
.SpaceAbove = 120
.WordWrap = TRUE
‘.ReadOnly = TRUE
.Height = 200
.SpaceAbove = 20
end with

Topic

[Support 2]

There are two ‘SpaceAbove’ lines in your code sample. When I removed the ‘.SpaceAbove = 20’, the ‘.SpaceAbove=120’ became active and seemed to resolve the problem during my testing. Please let me know if this is not the case for you.

Thanks,

Advansys Support

[Author]

Replies