aboutsummaryrefslogtreecommitdiffstats
path: root/src/lib/midi/MidiDefs.pas
diff options
context:
space:
mode:
authork-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2013-12-01 00:31:54 +0000
committerk-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2013-12-01 00:31:54 +0000
commit9cd462b34d5d839f8addfdf6a9f4469c99a8e653 (patch)
tree6924e73d97578431f2047dec0794761e6f7d07d4 /src/lib/midi/MidiDefs.pas
parent38d08e1ba24c550540edbda85992c995553648da (diff)
downloadusdx-9cd462b34d5d839f8addfdf6a9f4469c99a8e653.tar.gz
usdx-9cd462b34d5d839f8addfdf6a9f4469c99a8e653.tar.xz
usdx-9cd462b34d5d839f8addfdf6a9f4469c99a8e653.zip
formating and beautifying. no actual code change, but needs checks.
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@3011 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r--src/lib/midi/MidiDefs.pas53
1 files changed, 26 insertions, 27 deletions
diff --git a/src/lib/midi/MidiDefs.pas b/src/lib/midi/MidiDefs.pas
index f14b5e77..8ec7626e 100644
--- a/src/lib/midi/MidiDefs.pas
+++ b/src/lib/midi/MidiDefs.pas
@@ -4,7 +4,7 @@
released to the public domain. }
-{ Common definitions used by DELPHMID.DPR and the MIDI components.
+{ Common definitions used by DELPHMID.DPR and the Midi components.
This must be a separate unit to prevent large chunks of the VCL being
linked into the DLL. }
unit Mididefs;
@@ -23,33 +23,32 @@ uses
type
- {-------------------------------------------------------------------}
- { This is the information about the control that must be accessed by
- the MIDI input callback function in the DLL at interrupt time }
- PMidiCtlInfo = ^TMidiCtlInfo;
- TMidiCtlInfo = record
- hMem: THandle; { Memory handle for this record }
- PBuffer: PCircularBuffer; { Pointer to the MIDI input data buffer }
- hWindow: HWnd; { Control's window handle }
- SysexOnly: Boolean; { Only process System Exclusive input }
- end;
-
- { Information for the output timer callback function, also required at
- interrupt time. }
- PMidiOutTimerInfo = ^TMidiOutTimerInfo;
- TMidiOutTimerInfo = record
- hMem: THandle; { Memory handle for this record }
- PBuffer: PCircularBuffer; { Pointer to MIDI output data buffer }
- hWindow: HWnd; { Control's window handle }
- TimeToNextEvent: DWORD; { Delay to next event after timer set }
- MIDIHandle: HMidiOut; { MIDI handle to send output to
- (copy of component's FMidiHandle property) }
- PeriodMin: Word; { Multimedia timer minimum period supported }
- PeriodMax: Word; { Multimedia timer maximum period supported }
- TimerId: Word; { Multimedia timer ID of current event }
- end;
+ {-------------------------------------------------------------------}
+ { This is the information about the control that must be accessed by
+ the Midi input callback function in the DLL at interrupt time }
+ PMidiCtlInfo = ^TMidiCtlInfo;
+ TMidiCtlInfo = record
+ hMem: THandle; { Memory handle for this record }
+ PBuffer: PCircularBuffer; { Pointer to the Midi input data buffer }
+ hWindow: HWnd; { Control's window handle }
+ SysexOnly: boolean; { Only process System Exclusive input }
+ end;
+
+ { Information for the output timer callback function, also required at
+ interrupt time. }
+ PMidiOutTimerInfo = ^TMidiOutTimerInfo;
+ TMidiOutTimerInfo = record
+ hMem: THandle; { Memory handle for this record }
+ PBuffer: PCircularBuffer; { Pointer to Midi output data buffer }
+ hWindow: HWnd; { Control's window handle }
+ TimeToNextEvent: dword; { Delay to next event after timer set }
+ MidiHandle: HMidiOut; { Midi handle to send output to
+ (copy of component's FMidiHandle property) }
+ PeriodMin: word; { Multimedia timer minimum period supported }
+ PeriodMax: word; { Multimedia timer maximum period supported }
+ TimerId: word; { Multimedia timer ID of current event }
+ end;
implementation
-
end.