aboutsummaryrefslogtreecommitdiff
path: root/Занимательное программирование/7/2_minesweeper/minesweeper.lpr
diff options
context:
space:
mode:
authorEugen Wissner <belka@caraus.de>2026-03-15 15:00:22 +0100
committerEugen Wissner <belka@caraus.de>2026-03-15 15:00:22 +0100
commit4438e2e921b0047b1dcc22e42b5ee240811b729d (patch)
tree231c8c011c573174aef2a32d8787caab2b6ee825 /Занимательное программирование/7/2_minesweeper/minesweeper.lpr
parente87eaf26d5a3f17110c3a9c5d8b425eb6a9a5f49 (diff)
downloadbook-exercises-4438e2e921b0047b1dcc22e42b5ee240811b729d.tar.gz
Доделан сапер из 7-й главы, второго упражнения
Diffstat (limited to 'Занимательное программирование/7/2_minesweeper/minesweeper.lpr')
-rw-r--r--Занимательное программирование/7/2_minesweeper/minesweeper.lpr28
1 files changed, 28 insertions, 0 deletions
diff --git a/Занимательное программирование/7/2_minesweeper/minesweeper.lpr b/Занимательное программирование/7/2_minesweeper/minesweeper.lpr
new file mode 100644
index 0000000..48f2730
--- /dev/null
+++ b/Занимательное программирование/7/2_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.
+