Object: ID_11
Name:
Type:
Bar
Prompt:
D
elete
Or.:
6
Mark:
Shortcut
Negotiate
Key Label:
Container:
None
Key Text:
Object:
None
Skip For:
!
FormIsObject
(
)
OR
TYPE
(
"oApp.oToolBar"
)
#
"O"
OR
!
_screen
.
activeform
.
lAllowDelete
Message:
"Deletes the current record in the active form"
Comment:
Execute type:
Command
_screen
.
activeform
.
delete
(
)