Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#5

Re: Zwei Miditoene simultan ausgeben

  Alt 14. Jan 2006, 14:56
Zitat von hesubat:
Die Tonausgabe hat folgendes Format:
midistart:=(65536*volume)+(256*(ton+oktav))+144;
TreiberNr:=0;
MidiOutOpen(@MidiOH, TreiberNr, 0, 0, 0); ....
Das kann man als "Low-Level" Programmierung bezeichnen.
Du arbeitest auf unterer Ebene und musst mühsam jeden einzelnen Ton ausgeben.

"High-Level" Programmierung wäre eine MIDI-Komponente oder Klasse zu verwenden.
Für MIDI-Programmierung keine Hilfsklasse/Komponente zu verwenden, wäre reine Zeitverschwendung!!

In der JCL gibt es z.B. eine MIDI-Klasse in der Unit JclMidi,
mit der du Töne viel einfacher ausgeben kannst.
Das Umschalten des Ports, Klangfarbe, Lautstärke, ... wird damit ganz einfach.
Download: http://sourceforge.net/project/showf...group_id=47514
Es ist auch ein polyphones (<=mehrere Töne zusammen) Demoprogramm enthalten.
Andreas
  Mit Zitat antworten Zitat