Source position: GLWindows.pas line 285
type TGLPopupMenuClick = procedure(
Sender: TGLPopupMenu;
index: Integer;
const MenuItemText: string
) of object;