/
Pyatigor_Yaroslav
/
KMiVVR
Обзор
Документация
Войти
/
Pyatigor_Yaroslav
/
KMiVVR
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
CI/CD
Аналитика
Безопасность
master
Lab1/Lab1.pas
30 строк
591 B
Пятигор2302
upload files
18 ноя 2025, 14:22
18 ноя 2025, 14:22
52b38d5
Код
Авторство
О чём код?
unit Lab1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, GLS.Scene, GLS.Coordinates, GLS.Objects, GLS.SceneViewer, GLS.BaseClasses; type TForm1 = class(TForm) GLScene1: TGLScene; GLSceneViewer1: TGLSceneViewer; GLSphere1: TGLSphere; GLCamera1: TGLCamera; GLLightSource1: TGLLightSource; private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} end.