aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/lib
diff options
context:
space:
mode:
Diffstat (limited to 'Game/Code/lib')
-rw-r--r--Game/Code/lib/midi/MidiFile.pas13
-rw-r--r--Game/Code/lib/midi/Midiin.pas4
2 files changed, 14 insertions, 3 deletions
diff --git a/Game/Code/lib/midi/MidiFile.pas b/Game/Code/lib/midi/MidiFile.pas
index 5c15481e..10b64a80 100644
--- a/Game/Code/lib/midi/MidiFile.pas
+++ b/Game/Code/lib/midi/MidiFile.pas
@@ -91,8 +91,17 @@ unit MidiFile;
interface
uses
- Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
- stdctrls, ExtCtrls, WinProcs;
+ Windows,
+ Messages,
+ SysUtils,
+ Classes,
+ Graphics,
+ Controls,
+ Forms,
+ stdctrls,
+ ExtCtrls,
+ WinProcs;
+
type
TChunkType = (illegal, header, track);
TFileFormat = (single, multi_synch, multi_asynch);
diff --git a/Game/Code/lib/midi/Midiin.pas b/Game/Code/lib/midi/Midiin.pas
index 2f2e76c0..32a17c51 100644
--- a/Game/Code/lib/midi/Midiin.pas
+++ b/Game/Code/lib/midi/Midiin.pas
@@ -212,7 +212,9 @@ procedure Register;
{====================================================================}
implementation
-uses Graphics, Controls, Forms, Dialogs;
+uses Controls,
+ Forms,
+ Graphics;
(* Not used in Delphi 3
{ This is the callback procedure in the external DLL.