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