AutoScroll;
AutoScroll();
Метод AutoScroll центрирует изображение на рабочем пространстве без изменения масштаба отображения.
Для выполнения примера предполагается наличие объекта типа рабочее пространство. Cоздайте форму, добавьте на нее кнопку с наименованием «Button1», компонент WorkspaceBox с наименованием «WorkspaceBox1», компонент UiWorkspaceObject с наименованием «UiWorkspaceObject1», укажите рабочее пространство в качестве объекта компонента «UiWorkspaceObject1», компонент «UiWorkspaceObject1» в качестве источника компонента «WorkspaceBox1» и значение True свойства Active компонента «UiWorkspaceObject1». Добавьте ссылки на системные сборки Collections, Metabase и Workspace.
Class TestForm: Form
UiWorkspaceObject1: UiWorkspaceObject;
WorkspaceBox1: WorkspaceBox;
Button1: Button;
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Begin
WorkspaceBox1.View.AutoScroll;
End Sub Button1OnClick;
End Class TestForm;
При нажатии на кнопку «Button1» изображение будет центрировано в области компонента «WorkspaceBox1».
Для выполнения примера предполагается наличие объекта типа рабочее пространство. Cоздайте форму, добавьте на нее кнопку с наименованием «Button1», компонент WorkspaceBoxNet с наименованием «WorkspaceBoxNet1», компонент UiWorkspaceObjectNet с наименованием «UiWorkspaceObjectNet1», укажите рабочее пространство в качестве объекта компонента «UiWorkspaceObjectNet1», компонент «UiWorkspaceObjectNet1» в качестве источника компонента «WorkspaceBoxNet1» и значение True свойства Active компонента «UiWorkspaceObjectNet1». Добавьте ссылки на системные сборки Collections, Metabase и Workspace.
Imports Prognoz.Platform.Forms.Net;
Imports Prognoz.Platform.Interop.Andy;
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Workspace;
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Begin
WorkspaceBoxNet1.View.AutoScroll();
End Sub;
При нажатии на кнопку «Button1» изображение будет центрировано в области компонента «WorkspaceBoxNet1».
См. также: