| Parameter | Description |
|---|---|
| bEdit | Pass True to make a view editable, False to disallow editing. |
Procedure ChangeEditMode Boolean bEdit
| Call: | Send ChangeEditMode bEdit |
Sets a drilldown view's edit mode and updates the enabled state of the data entry objects (DEOs).
ChangeEditMode is used to change the edit mode of a drilldown view (peWebViewStyle = wvsDrilldown). The bEdit parameter determines if the view should be editable (True) or read-only. The pbEnabled state of all DEOs will be updated to reflect this change.
When a drilldown view is navigated to, the tWebNavigateData member bReadOnly can be set to make a True inside of OnGetNavigateForwardData. All DEOs within the view will be enabled or disabled appropriately to represent this.
After the view has been activated, you can change this state by calling ChangeEditMode.
You can determine a view's read-only state by calling IsViewReadOnly.
Note that this should only be used with drilldown style views.
// The Invoking object makes the view read-only
Procedure OnGetNavigateForwardData tWebNavigateData ByRef NavigateData Handle hoToView
Move True to NavigateData.bReadOnly
End_Procedure
// This action button could be added to the invoked view, to change its edit state
Object oEditBtn is a cWebMenuItem
Set psCaption to "Edit"
Set psCSSClass to "WebEditMenuItem"
Procedure OnClick
Send ChangeEditMode True
End_Procedure
End_Object
// This action button could be added to the invoked view, to toggle its edit state
Object oEditBtn is a cWebMenuItem
Set psCaption to "Edit"
Set psCSSClass to "WebEditMenuItem"
Procedure OnClick
Boolean bIsViewReadOnly
Get IsViewReadOnly to bIsViewReadOnly
Send ChangeEditMode bIsViewReadOnly // note True is enabled, False disabled. So this toggles
End_Procedure
End_Object
If you set pbClearAfterSave to False and don't close a cWebView after saving, you probably want to send ChangeEditMode False from OnViewSaved, so that after a save, edit mode is disabled until the user enables it again.
Procedure OnViewSaved Handle hoServer Boolean bChanged
// re-disable edit mode
Send ChangeEditMode False
Send SetActionButtons
End_Procedure