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