Notifications are stopped for a previously selected book.
Notifications are started for the book selected from the list box.
The status line color is changed to white,
and a message reserving the book is displayed.
Instructions
- Select the ReservationForm.
- In the properties window, select listBoxBooks.
- In the methods window, select click.
- Copy and compile the code on the right.
|
listBoxBooks_click(listbox : ListBox input) updating;
vars
bk : Book;
begin
endNotificationForSubscriber(self);
bk := listbox.listObject.Book;
beginNotification(bk, Object_Update_Event,
Response_Continuous, 0);
statusLine.backColor := White;
statusLine.caption := "Reserve '" & bk.title & "'";
end; |
|
