/
stud_22-365
/
GLXEngine
Обзор
Документация
Войти
/
stud_22-365
/
GLXEngine
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
Examples/Demos/rendering/fullscreen/FullscreenD.dpr
22 строки
597 B
GLScene
Removed to Examples folder
27 дек 2022, 21:41
27 дек 2022, 21:41
9ec27fa
Код
Авторство
О чём код?
(* Basic demo for using the FullScreen Viewer and GLCanvas. This demo uses no forms, but switches directly to 800x600x32bpp fullscreen mode and renders a teapot with a colored light, hitting 'ESC' will leave full screen mode. The demo also makes use of GLCanvas to render a custom 2D overlay with TGLCanvas, here a yellow reticle at mouse position. *) program FullscreenD; uses Forms, fFullscreenD in 'fFullscreenD.pas' {DataModuleFS: TDataModule}; {$R *.res} begin Application.Initialize; Application.CreateForm(TDataModuleFS, DataModuleFS); Application.Run; end.