Source position: shape.pp line 149
function XShapeInputSelected(
display: PDisplay;
window: TWindow
):culong;