Source position: mseprinter.pas line 505
type pageorientationeventty = procedure(
const sender: tobject;
var avalue: pageorientationty;
var accept: Boolean
) of object;