Source position: shape.pp line 65
function XShapeQueryExtension(
display: PDisplay;
event_base: Pcint;
error_base: Pcint
):TBoolResult;