WD The Event function

// Adds the months
FOR i = 1 TO 12
ListAdd(LIST_Month, MonthNumberInAlpha(i))
END

// Displays the selected month
EDT_SelectedMonth = LIST_Month[LIST_Month]


//-----------------------------

PROCEDURE WIN_Event_Function()

// The EXTERN command is used to automatically include the WINCONST.WL file
// This file contains the value of the Windows constants
// This code must be moved into the initialization code of the project or window
EXTERN "WINCONST.WL"


// Events on the LIST_Month control
Event("MouseOrKeyboard", LIST_Month..FullName, WM_KEYDOWN) // Keyboard key down
Event("MouseOrKeyboard", LIST_Month..FullName, WM_LBUTTONDOWN) // Left mouse click