Wrong scaling of dialog box to fit wide layout region

HCL Domino Domino Forum
1

I have a dialog box which should be scaled to fit a layout region (the layout region’s width is over 3/4 of the workspace/screen). It’s being called with workspace.dialogbox with parameters autoHorizFit and autoVertFit set to True.

In Notes 5.0 everything works properly.

The problem is, when the dialogbox is being opened with Notes 6.0, it isn’t scaled to fit the layout region and it opens with a fixed width and scrollbars instead.

So is it possible to force dialog box to display

full layout region in LN6.0 even if it would leave the screen (workspace) area as in LN5.0?

Thanks in advance for any help.

2

Subject: You didn’t set sizetotable to true, did you?

3

Subject: RE: You didn’t set sizetotable to true, did you?

Yes, I didn’t set sizeToTable to True initially, but setting it later didn’t change anything, because this setting refers to first table on the form and not the first layout region. In fact, setting sizeToTable to True gave exactly the same result as setting both autoHorizFit and autoVertFit to False (no scalling at all).

Reverting back to my initial settings restored previous behavior where some scalling appears (dialog box window is larger), although it isn’t being scaled completly, as described in main thread.

Setting screen resolution higher than 1024x768 did make a difference, but it’s rather useless in case of people having notebooks which don’t support it.

So I’m still looking for any solution to this problem and any help would be appreciated.

4

Subject: RE: You didn’t set sizetotable to true, did you?

That was my only (wild) guess. Can you post the code? Maybe there’s a typo you’re not catching.

5

Subject: Here is the code

So, here is the code where workspace.DialogBox is being called.

Function EditRow(doc As NotesDocument, editForm As Variant, title As Variant) As Variant

Dim workspace As New NotesUIWorkspace

Dim tempdoc As NotesDocument

Dim rowNumber As Integer

Dim editTableFields(1 To 19) As String

editTableFields(1) = “PLP_=T”

...

editTableFields(19) = “PNRDOK_=N”

rowNumber = doc.ROW(0)

Set tempdoc = CreateTempDoc(doc, rowNumber)

Forall field In editTableFields

fieldName = Strleft(field, "=") & rowNumber

If Not tempdoc.HasItem(fieldName) Then Set item = tempdoc.ReplaceItemValue(fieldName, doc.GetItemValue(fieldName))

End Forall

accepted = workspace.DialogBox (editForm, True, True, False, True, False, False, title, tempdoc)

EditRow = accepted

End Function

All required fields exist on form and are opened properly in the dialog box.

Variables ‘editForm’, ‘title’ and ‘tempdoc’ are also passed correctly to the dialog.

the only problem is, that the form used to display the dialog box (which name is passed by by ‘editForm’ variable) has quite a wide layout region (23,495cm).

I’ve noticed, that if I shrink the layout to 21,694cm, dialog box is displayed without scrollbars.

But then my design elements no longer fit the layout…

Anything larger than that (e.g. 21,696cm) causes the scrollbars to appear.

This behavior exists olny in Lotus Notes 6.0, in LN 5.0 wide layouts were fully visible regardless of their size.

Did IBM changed something in LN 60 which makes it incompatible with LN50 (yet again :frowning: ) or is there an option to restore previous behavior?

Thanks for help

Tomek