IWxView.DrawOnGraphics

Синтаксис

DrawOnGraphics(Graphics: IGxGraphics);

DrawOnGraphics(Graphics: Prognoz.Platform.Interop.Drawing.IGxGraphics);

Параметры

Graphics. Графический контекст.

Описание

Метод DrawOnGraphics рисует рабочее пространство на графическом контексте.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента WorkspaceBox с наименованием «WorkspaceBox1» и какого-либо источника данных для «WorkspaceBox1». Предполагается наличие в файловой системе изображения «C:\WSP.png».

Добавьте ссылки на системные сборки: Andy, Drawing, Workspace.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    ws: IWxWorkspace;
    view: IWxView;

    ellipse: IWxEllipse;
    Img: IGxImage;
    Graph: IGxGraphics;
Begin
    
// Получаем рабочее пространство для редактирования
    ws := UiWorkspace1.WxWorkspace;
    view := ws.CreateView;

    ellipse := ws.CreateEllipse;
    view.AutoScaleAndScroll;
    Img := GxBitmap.CreateNew(
300300, GxPixelFormat.Format32bppArgb);
    Graph := GxGraphicsClass.FromImage(Img);
    View.DrawOnGraphics(Graph);
    Img.SaveToFileEncoded(
"C:\WSP.png", GxImageFormats.Png);
End Sub Button1OnClick;
Imports Prognoz.Platform.Interop.Andy;
Imports Prognoz.Platform.Interop.Workspace;
Imports Prognoz.Platform.Interop.Drawing;

 
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    ws: IWxWorkspace;
    view: IWxView;
    ellipse: IWxEllipse;

    GxImageFormats: GxImageFormatsClass = New GxImageFormatsClass();
    Graph: GxGraphics;
    BmpCls: GxBitmapClass = 
New GxBitmapClass();
    Bmp: GxBitmap;
    GraphCls: GxGraphicsClass = 
New GxGraphicsClassClass();
Begin
    
// Получаем рабочее пространство для редактирования
    ws := uiWorkspaceNet1.WxWorkspace;
    view := ws.CreateView();
    view := ws.Views.Item[
0];
    ellipse := ws.CreateEllipse();
    view.AutoScaleAndScroll();
    Bmp := BmpCls.CreateNew(
300300, GxPixelFormat.pifFormat32bppArgb);
    Graph := GraphCls.FromImage(Bmp);
    view.DrawOnGraphics(Graph);
    Bmp.SaveToFileEncoded(
"C:\WSP.png", GxImageFormats.Png);
End Sub;

 

После выполнения примера в указанный файл будет сохранена часть изображения рабочего пространства заданного размера.

См. также:

IWxView