aboutsummaryrefslogtreecommitdiffstats
path: root/src/screens
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--src/screens/UScreenEdit.pas4
-rw-r--r--src/screens/UScreenEditHeader.pas4
-rw-r--r--src/screens/UScreenLevel.pas4
-rw-r--r--src/screens/UScreenName.pas4
-rw-r--r--src/screens/UScreenOpen.pas4
-rw-r--r--src/screens/UScreenOptions.pas4
-rw-r--r--src/screens/UScreenOptionsAdvanced.pas4
-rw-r--r--src/screens/UScreenOptionsGame.pas4
-rw-r--r--src/screens/UScreenOptionsGraphics.pas12
-rw-r--r--src/screens/UScreenOptionsLyrics.pas12
-rw-r--r--src/screens/UScreenOptionsThemes.pas4
-rw-r--r--src/screens/UScreenPartyPlayer.pas14
-rw-r--r--src/screens/UScreenPartyScore.pas4
-rw-r--r--src/screens/UScreenPartyWin.pas4
-rw-r--r--src/screens/UScreenPopup.pas4
-rw-r--r--src/screens/UScreenSongJumpto.pas4
-rw-r--r--src/screens/UScreenStatDetail.pas4
-rw-r--r--src/screens/UScreenWelcome.pas4
18 files changed, 94 insertions, 4 deletions
diff --git a/src/screens/UScreenEdit.pas b/src/screens/UScreenEdit.pas
index bf664eb1..b6ed44b1 100644
--- a/src/screens/UScreenEdit.pas
+++ b/src/screens/UScreenEdit.pas
@@ -2,6 +2,10 @@ unit UScreenEdit;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses UMenu, SDL, UThemes;
diff --git a/src/screens/UScreenEditHeader.pas b/src/screens/UScreenEditHeader.pas
index 28bf7682..3f362304 100644
--- a/src/screens/UScreenEditHeader.pas
+++ b/src/screens/UScreenEditHeader.pas
@@ -2,6 +2,10 @@ unit UScreenEditHeader;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses UMenu,
diff --git a/src/screens/UScreenLevel.pas b/src/screens/UScreenLevel.pas
index 1ea79e7f..8ecd1bcf 100644
--- a/src/screens/UScreenLevel.pas
+++ b/src/screens/UScreenLevel.pas
@@ -2,6 +2,10 @@ unit UScreenLevel;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses
diff --git a/src/screens/UScreenName.pas b/src/screens/UScreenName.pas
index f2d59f05..8da46775 100644
--- a/src/screens/UScreenName.pas
+++ b/src/screens/UScreenName.pas
@@ -2,6 +2,10 @@ unit UScreenName;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses
diff --git a/src/screens/UScreenOpen.pas b/src/screens/UScreenOpen.pas
index 186b9b47..bb197aec 100644
--- a/src/screens/UScreenOpen.pas
+++ b/src/screens/UScreenOpen.pas
@@ -2,6 +2,10 @@ unit UScreenOpen;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses UMenu, UMusic, SDL, SysUtils, UFiles, UTime, USongs, UIni, ULog, UTexture, UMenuText,
diff --git a/src/screens/UScreenOptions.pas b/src/screens/UScreenOptions.pas
index 24633115..96306df3 100644
--- a/src/screens/UScreenOptions.pas
+++ b/src/screens/UScreenOptions.pas
@@ -2,6 +2,10 @@ unit UScreenOptions;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses
diff --git a/src/screens/UScreenOptionsAdvanced.pas b/src/screens/UScreenOptionsAdvanced.pas
index be8895e1..9460653d 100644
--- a/src/screens/UScreenOptionsAdvanced.pas
+++ b/src/screens/UScreenOptionsAdvanced.pas
@@ -2,6 +2,10 @@ unit UScreenOptionsAdvanced;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses
diff --git a/src/screens/UScreenOptionsGame.pas b/src/screens/UScreenOptionsGame.pas
index 2dc8dd7f..3d542b65 100644
--- a/src/screens/UScreenOptionsGame.pas
+++ b/src/screens/UScreenOptionsGame.pas
@@ -2,6 +2,10 @@ unit UScreenOptionsGame;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses
diff --git a/src/screens/UScreenOptionsGraphics.pas b/src/screens/UScreenOptionsGraphics.pas
index f2b6faa2..afee44a9 100644
--- a/src/screens/UScreenOptionsGraphics.pas
+++ b/src/screens/UScreenOptionsGraphics.pas
@@ -2,10 +2,20 @@ unit UScreenOptionsGraphics;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses
- UMenu, SDL, UDisplay, UMusic, UFiles, UIni, UThemes;
+ UMenu,
+ SDL,
+ UDisplay,
+ UMusic,
+ UFiles,
+ UIni,
+ UThemes;
type
TScreenOptionsGraphics = class(TMenu)
diff --git a/src/screens/UScreenOptionsLyrics.pas b/src/screens/UScreenOptionsLyrics.pas
index 42f1fadb..d0c60cfa 100644
--- a/src/screens/UScreenOptionsLyrics.pas
+++ b/src/screens/UScreenOptionsLyrics.pas
@@ -2,10 +2,20 @@ unit UScreenOptionsLyrics;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses
- UMenu, SDL, UDisplay, UMusic, UFiles, UIni, UThemes;
+ UMenu,
+ SDL,
+ UDisplay,
+ UMusic,
+ UFiles,
+ UIni,
+ UThemes;
type
TScreenOptionsLyrics = class(TMenu)
diff --git a/src/screens/UScreenOptionsThemes.pas b/src/screens/UScreenOptionsThemes.pas
index a4f00b64..d5beb2d2 100644
--- a/src/screens/UScreenOptionsThemes.pas
+++ b/src/screens/UScreenOptionsThemes.pas
@@ -2,6 +2,10 @@ unit UScreenOptionsThemes;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses
diff --git a/src/screens/UScreenPartyPlayer.pas b/src/screens/UScreenPartyPlayer.pas
index fa717677..9d3b0410 100644
--- a/src/screens/UScreenPartyPlayer.pas
+++ b/src/screens/UScreenPartyPlayer.pas
@@ -1,11 +1,21 @@
unit UScreenPartyPlayer;
-Interface
+interface
+
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
{$I switches.inc}
uses
- UMenu, SDL, UDisplay, UMusic, UFiles, SysUtils, UThemes;
+ UMenu,
+ SDL,
+ UDisplay,
+ UMusic,
+ UFiles,
+ SysUtils,
+ UThemes;
type
TScreenPartyPlayer = class(TMenu)
diff --git a/src/screens/UScreenPartyScore.pas b/src/screens/UScreenPartyScore.pas
index 176a94b2..7c902f26 100644
--- a/src/screens/UScreenPartyScore.pas
+++ b/src/screens/UScreenPartyScore.pas
@@ -2,6 +2,10 @@ unit UScreenPartyScore;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses
diff --git a/src/screens/UScreenPartyWin.pas b/src/screens/UScreenPartyWin.pas
index 002c6f75..3c7f4ea4 100644
--- a/src/screens/UScreenPartyWin.pas
+++ b/src/screens/UScreenPartyWin.pas
@@ -2,6 +2,10 @@ unit UScreenPartyWin;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses
diff --git a/src/screens/UScreenPopup.pas b/src/screens/UScreenPopup.pas
index b51fac98..d75dc145 100644
--- a/src/screens/UScreenPopup.pas
+++ b/src/screens/UScreenPopup.pas
@@ -2,6 +2,10 @@ unit UScreenPopup;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses
diff --git a/src/screens/UScreenSongJumpto.pas b/src/screens/UScreenSongJumpto.pas
index 89d198cc..35ec6e56 100644
--- a/src/screens/UScreenSongJumpto.pas
+++ b/src/screens/UScreenSongJumpto.pas
@@ -2,6 +2,10 @@ unit UScreenSongJumpto;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses
diff --git a/src/screens/UScreenStatDetail.pas b/src/screens/UScreenStatDetail.pas
index 891b108d..00249e9a 100644
--- a/src/screens/UScreenStatDetail.pas
+++ b/src/screens/UScreenStatDetail.pas
@@ -2,6 +2,10 @@ unit UScreenStatDetail;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses
diff --git a/src/screens/UScreenWelcome.pas b/src/screens/UScreenWelcome.pas
index 613f3a80..6c3fc52f 100644
--- a/src/screens/UScreenWelcome.pas
+++ b/src/screens/UScreenWelcome.pas
@@ -2,6 +2,10 @@ unit UScreenWelcome;
interface
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
{$I switches.inc}
uses