diff options
| author | Eugen Wissner <belka@caraus.de> | 2025-12-17 12:12:16 +0100 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2025-12-17 12:13:15 +0100 |
| commit | 6d7c43c85f8852ed3b3fa9cefc742bc87e941842 (patch) | |
| tree | 20da65c403c17b962027469897500de626a958f4 /Занимательное программирование/3/4_cube/graphics_3d.lpr | |
| parent | 2878f1e34c2c2e19d5b7f6fd368dbf9ec0c6277f (diff) | |
| download | book-exercises-6d7c43c85f8852ed3b3fa9cefc742bc87e941842.tar.gz | |
Добавил третью главу занимательного программирования
Diffstat (limited to 'Занимательное программирование/3/4_cube/graphics_3d.lpr')
| -rw-r--r-- | Занимательное программирование/3/4_cube/graphics_3d.lpr | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/Занимательное программирование/3/4_cube/graphics_3d.lpr b/Занимательное программирование/3/4_cube/graphics_3d.lpr new file mode 100644 index 0000000..3778580 --- /dev/null +++ b/Занимательное программирование/3/4_cube/graphics_3d.lpr @@ -0,0 +1,29 @@ +program graphics_3d;
+
+{$mode objfpc}{$H+}
+
+uses
+ {$IFDEF UNIX}
+ cthreads,
+ {$ENDIF}
+ {$IFDEF HASAMIGA}
+ athreads,
+ {$ENDIF}
+ Interfaces, // this includes the LCL widgetset
+ Forms, Octahedron, geometry
+ { you can add units after this };
+
+{$R *.res}
+
+begin
+ Randomize;
+ RequireDerivedFormResource:=True;
+ Application.Scaled:=True;
+ {$PUSH}{$WARN 5044 OFF}
+ Application.MainFormOnTaskbar:=True;
+ {$POP}
+ Application.Initialize;
+ Application.CreateForm(TForm1, Form1);
+ Application.Run;
+end.
+
|