Xbasic
SYSTEM_EVENT_DROP Function
Syntax
V SYSTEM_EVENT_DROP(C system_event,C name)
Arguments
- system_event
"database_exit". Character
- name
The name of an event registered by CAN_DATABASE_EXIT()or ON_DATABASE_EXIT(). Character
Description
The SYSTEM_EVENT_DROP() function removes an event registered by CAN_DATABASE_EXIT()or ON_DATABASE_EXIT().
The following script registers events.
code =
ui_msg_box("Notice", "The database is about to close - First warning")
%code%
on_database_exit(code)
Code2 =
Ui_msg_box("Notice", "The database is now closing - Second warning")
%code%
on_database_exit(code2)This code returns the registered events.
dim ptr as P
ptr = system_event_data_get()
? ptr.database_exit
= +1.
+2.
? ptr.database_exit.1
= code = ui_msg_box("Notice", "The database is about to close - First warning")
level = "Application"
? ptr.database_exit.2
= code = ui_msg_box("Notice", "The database is now closing - Second warning")
level = "Application"This code drops the second database_exit event.
system_event_drop("database_exit", "2")See Also