diff options
| author | k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2013-12-01 15:32:29 +0000 |
|---|---|---|
| committer | k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2013-12-01 15:32:29 +0000 |
| commit | 1e1329e77c498d550d12b8ad0d2325fdae2f4afa (patch) | |
| tree | af61ce92ecbf0c1d019017708a1fc17fdb1f4fcd /src/lib | |
| parent | b7992fdd331fa331726c374a1c2628417e3f5431 (diff) | |
| download | usdx-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')
| -rw-r--r-- | src/lib/midi/MidiCons.pas | 7 |
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 } |