• Когда вам в голову пришла хорошая идея, действуйте незамедлительно.

Работа с фигурами в графическом окне

Microsoft Small Basic класс фигуры позволяет выполнять разные операции с различными фигурами в графическом окне. Вы можете создавать новые фигуры, такие как эллипсы, изображения, линии, прямоугольники, треугольники. Эти фигуры можно перемещать, вращать, масштабировать и т.п.

Вы можете скопировать указанный ниже код программы в IDE MS Small Basic и запустить:

 

ellipse = Shapes.AddEllipse(50, 30)

image = Shapes.AddImage(Flickr.GetRandomPicture("cat"))

PauseProgram()  ' Приостанавливаем программу после каждого действия, чтобы увидеть то, что получается.

Shapes.Move(image, 200, 300)

PauseProgram()

line = Shapes.AddLine(0, 100, 20, 120)

PauseProgram()

rectangle = Shapes.AddRectangle(50, 30)

PauseProgram()

triangle = Shapes.AddTriangle(0, 0, 0, 30, 30, 0)

PauseProgram()

Shapes.Animate(ellipse, 100, 100, 2000)

PauseProgram()

GraphicsWindow.Title = "Левая координата линии: " + Shapes.GetLeft(line)

PauseProgram()

GraphicsWindow.Title = "Верхняя координата эллипса: " + Shapes.GetTop(ellipse)

PauseProgram()

Shapes.HideShape(triangle)

PauseProgram()

Shapes.Move(rectangle, 100, 10)

PauseProgram()

Shapes.Remove(line)

PauseProgram()

Shapes.Rotate(rectangle, 45)

PauseProgram()

Shapes.SetOpacity(rectangle, 50)

PauseProgram()

Shapes.ShowShape(triangle)

PauseProgram()

Shapes.Zoom(ellipse, 3, 5)

GraphicsWindow.ShowMessage("Готово!", "Завершение")

Sub PauseProgram

Program.Delay(2000) ' Приостановка программы на 2 секунды (2000 миллисекунд)

EndSub


Поделиться: