ConvertPtToView(Pt: IGxPoint): IGxPointF;
Pt. Точка в пикселях.
Метод ConvertPtToView преобразует заданную точку в пикселях в точку в миллиметрах.
В рассматриваемом примере предполагается существование объекта ws типа IWxWorkspace.
Sub UserProc;
Var
ws: IWxWorkspace;
view : IWxView;
Point : IGxPoint;
Begin
view := ws.CreateView;
view.Id := "MyView";
view.Scale := 0.5;
view.Size := New GxSizeF.Create(100.55,100.66);
Point := New GxPoint.Create(10,10);
view.Offset := view.ConvertPtToView(Point);
End Sub UserProc;
После выполнения примера будет создано отображение рабочего пространства и заданы параметры.
См. также: