Source position: unit_handle_the_menus.pas line 16
procedure Handle_My_Menu(
var doneFlag: Boolean;
theMenu: Integer;
theItem: Integer;
var theInput: TEHandle
);