Экспорт части чертежа в PDF

[armand]

Здравствуйте,

Подскажите, пожалуйста, мне надо экспортировать часть CAD чертежа в PDF.
Я использую ClippingRect, хотя написано, что его не рекомендуется использовать,
но другого метода я пока не нахожу.
Но при его использовании экспортируется смещенная область.
Т.е. ранее я указал некоторую область в чертеже (через DrawingNavigator),
и теперь пытаюсь экспортировать эту область, но она оказывается в другом месте.
Надо ли как-то "приводить" координаты для передачи в sgCadImage через ClipRect.
Или есть другой способ для экспорта части чертежа в PDF?

Code: Select all

procedure ExportViewRectToPDF(const AFileName: string; const Clip: TFRect);
var
  vExpCADfile1: TsgPDFExport;
  U: string;
begin
  try
    {Img - TsgCadImage}
    Img.ClippingRect := @Clip;

    vExpCADfile1 := TsgPDFExport.Create(Img);
    vExpCADfile1.LayoutExportMode := lemCurrentLayout;
    vExpCADfile1.SaveToFile(AFileName);

  finally
    vExpCADfile1.Free;
    Img.ClippingRect := nil;
  end;
end;

С уважением,
Александр.

[support]

Здравствуйте Александр.
Использование ClippingRect некорректно, это свойство предназначается только для внутреннего использования. Для выполнения вашей задачи создайте на произвольном листе (layout) объект класса TsgDXFViewport. Затем выполните экспорт в PDF только этого листа.

Александр.