comp.lang.ada
 help / color / mirror / Atom feed
From: John McCabe <john@nospam.assen.demon.co.uk>
Subject: Re: This MIDI stuff, would someone be interested in reviewing my code?
Date: Tue, 09 Mar 2010 12:24:05 +0000
Date: 2010-03-09T12:24:05+00:00	[thread overview]
Message-ID: <7cfcp5p6jipskr97btbmmqu3uc80c75h78@4ax.com> (raw)
In-Reply-To: cq7cp5508bmai028m6ki1bqh889lkpq9bo@4ax.com

On Tue, 09 Mar 2010 10:21:00 +0000, John McCabe
<john@nospam.assen.demon.co.uk> wrote:

>>I would make Numinputdevices and Numoutputdevices constants.

>They're not constants though - they're discovered from the
>midiInGetNumDevs and midiOutGetnumDevs functions.

Just realised what you mean; they're constant through the life of the
program so do

procedure MidiDevs is
   blah

   Num_Input_Devices : Win32.UINT := Win32.Mmsystem.midiInGetNumDevs;
   <same for output>
begin

   blah

end MidiDevs;

Yes, that would be possible.




  parent reply	other threads:[~2010-03-09 12:24 UTC|newest]

Thread overview: 15+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2010-03-08 11:40 This MIDI stuff, would someone be interested in reviewing my code? John McCabe
2010-03-08 11:52 ` Gautier write-only
2010-03-08 12:30   ` John McCabe
2010-03-08 17:24 ` Jeffrey R. Carter
2010-03-09 10:21   ` John McCabe
2010-03-09 12:10     ` Brian Drummond
2010-03-09 12:26       ` John McCabe
2010-03-09 12:42         ` John McCabe
2010-03-10 11:12           ` Stephen Leake
2010-03-10 12:29             ` John McCabe
2010-03-09 12:24     ` John McCabe [this message]
2010-03-09 13:11       ` Martin
2010-03-09 14:00         ` John McCabe
2010-03-13  8:12 ` Christophe Chaumet
2010-03-15 11:35   ` John McCabe
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox