/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
InstallerSamples/!MainFeatures/05_Graph/ABC.pas
37 строк
706 B
Mikhalkovich Stanislav
Поправил старые примеры 2
12 окт 2025, 22:21
12 окт 2025, 22:21
d6a70ee
Код
Авторство
О чём код?
// Модуль ABCObjects. Изменение свойств объекта uses ABCObjects,GraphABC; const delay = 300; procedure Pause; begin Sleep(delay); end; begin var z := new StarABC(Window.Center.X,Window.Center.Y,70,30,6,Color.Green); var r := new RectangleABC(100,100,200,100,Color.Gold); Pause; r.Center := Window.Center; Pause; r.Height := 70; Pause; r.Width := 220; Pause; z.Radius := 150; Pause; z.Color := Color.LightCoral; Pause; z.Count := 5; Pause; r.Text := 'PascalABC.NET'; r.Color := Color.Gainsboro; Pause; r.BorderWidth := 3; r.BorderColor := Color.Blue; Pause; r.Center := Window.Center; Pause; // r.Bordered := False; end.