aboutsummaryrefslogtreecommitdiffstats
path: root/src/lib/midi
diff options
context:
space:
mode:
authork-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2013-12-01 15:32:29 +0000
committerk-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2013-12-01 15:32:29 +0000
commit1e1329e77c498d550d12b8ad0d2325fdae2f4afa (patch)
treeaf61ce92ecbf0c1d019017708a1fc17fdb1f4fcd /src/lib/midi
parentb7992fdd331fa331726c374a1c2628417e3f5431 (diff)
downloadusdx-1e1329e77c498d550d12b8ad0d2325fdae2f4afa.tar.gz
usdx-1e1329e77c498d550d12b8ad0d2325fdae2f4afa.tar.xz
usdx-1e1329e77c498d550d12b8ad0d2325fdae2f4afa.zip
enable MidiCons.pas for all platforms, part 2
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@3014 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'src/lib/midi')
-rw-r--r--src/lib/midi/MidiCons.pas7
1 files changed, 6 insertions, 1 deletions
diff --git a/src/lib/midi/MidiCons.pas b/src/lib/midi/MidiCons.pas
index aa8462c3..1e9076f8 100644
--- a/src/lib/midi/MidiCons.pas
+++ b/src/lib/midi/MidiCons.pas
@@ -3,7 +3,6 @@
{ Written by David Churcher <dchurcher@cix.compulink.co.uk>,
released to the public domain. }
-
{ Midi Constants }
unit MidiCons;
@@ -14,8 +13,10 @@ interface
{$H+} // use long strings
{$ENDIF}
+{$IFNDEF FPC}
uses
Messages;
+{$ENDIF}
const
MIDI_ALLNOTESOFF = $7B;
@@ -39,6 +40,10 @@ const
MIDI_ACTIVESENSING = $FE;
MIDI_SYSTEMRESET = $FF;
+{$IFDEF FPC}
+ WM_USER = $400; { standard WM_USER value }
+{$ENDIF}
+
MIM_OVERFLOW = WM_USER; { Input buffer overflow }
MOM_PLAYBACK_DONE = WM_USER + 1; { Timed playback complete }