Source position: postscriptcanvas.pas line 151
public procedure TPostScriptPrinterCanvas.Frame3d(
var ARect: TRect;
const FrameWidth: Integer;
const Style: TGraphicsBevelCut
); override;