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