aboutsummaryrefslogtreecommitdiff
path: root/Занимательное программирование/7/1_minesweeper/minesweeper.lpr
diff options
context:
space:
mode:
authorEugen Wissner <belka@caraus.de>2026-03-11 14:44:08 +0100
committerEugen Wissner <belka@caraus.de>2026-03-11 14:44:08 +0100
commite87eaf26d5a3f17110c3a9c5d8b425eb6a9a5f49 (patch)
treeddaeec028ace23290f9f26101c8349d0941f4c99 /Занимательное программирование/7/1_minesweeper/minesweeper.lpr
parent1c52c7d56003b62c59bf0afa458c71262f13435f (diff)
downloadbook-exercises-e87eaf26d5a3f17110c3a9c5d8b425eb6a9a5f49.tar.gz
Добавил сапера из седьмой главы
Diffstat (limited to 'Занимательное программирование/7/1_minesweeper/minesweeper.lpr')
-rw-r--r--Занимательное программирование/7/1_minesweeper/minesweeper.lpr28
1 files changed, 28 insertions, 0 deletions
diff --git a/Занимательное программирование/7/1_minesweeper/minesweeper.lpr b/Занимательное программирование/7/1_minesweeper/minesweeper.lpr
new file mode 100644
index 0000000..48f2730
--- /dev/null
+++ b/Занимательное программирование/7/1_minesweeper/minesweeper.lpr
@@ -0,0 +1,28 @@
+program minesweeper;
+
+{$mode objfpc}{$H+}
+
+uses
+ {$IFDEF UNIX}
+ cthreads,
+ {$ENDIF}
+ {$IFDEF HASAMIGA}
+ athreads,
+ {$ENDIF}
+ Interfaces, // this includes the LCL widgetset
+ Forms, Unit1
+ { you can add units after this };
+
+{$R *.res}
+
+begin
+ RequireDerivedFormResource:=True;
+ Application.Scaled:=True;
+ {$PUSH}{$WARN 5044 OFF}
+ Application.MainFormOnTaskbar:=True;
+ {$POP}
+ Application.Initialize;
+ Application.CreateForm(TForm1, Form1);
+ Application.Run;
+end.
+