Embeds an entire OI form in the panel control.

Syntax

rv = Send_Message(Ctrl, "OLE.SetForm", Handle, FitWidth, FitHeight)

Parameters

ParameterDescription
HandleThe windows handle to the form to embed.
FitWidthFlag determining whether to use the form's width or the SRP Panel's width
FitHeightFlag determining whether to use the form's height or the SRP Panel's height

Remarks

The SetForm method embeds an OI form inside the scrollable SRP Panel Control. Only one form can be set at a time.

The Handle parameter is the windows handle of the form as returned from the HANDLE property.

The FitWidth and FitHeight parameters define the resizing behavior of the form. By default, the form's SIZE dimensions are used. So, if the form is bigger than the SRP Panel Control, then scroll bars appear which allow the user to scroll the form as desired. However, if you want the form to be autosized to fit the dimensions of the SRP Panel Control, set eiter of these flags to ture. For example, if you set FitWidth to 1, then there will never be a horizontal scroll bar because the width of the form will always equal the width of the SRP Panel Control.

You can use SetForm or AddCtrls, but never both. Calling one will undo the other. For example, called SetForm will remove all individual controls you added via AddCtrls.

Example

// Start the window we wish to embed, then add it to the panel, autosizing the width 
NewWindow = Start_Window("MY_WINDOW") 
Handle = Get_Property(NewWindow, "HANDLE") 
Send_Message(@Window:".OLE_PANEL", "OLE.SetForm", Handle, 1, 0)

See Also

AddCtrlsRemoveForm