Midi-Sequenz mmit Delphi-Mediaplayer abspielen

[Elko]

Hallo an alle,
ich habe folgendes Problem:
Der MediaPlayer ihn meinem Projekt soll eine Midi-Datei abspielen. Mit anderen Dateien (zB. *.wav) funktioniert es prima, aber bei einer *.mid Datei klappt bei mir gar nix
Hier einfach mal der Code, welche Datei er abspielen soll:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
 Mediaplayer1.FileName := 'C:\WINDOWS\Media\town.mid';
 Mediaplayer1.Open;
 Mediaplayer1.Play;
end;

Viele Grüße, Elko

[snow]

soweit ich weis sind mididateien nur Klangdateien. Es wird also nur angegeben

Zitat:

C-D-E-F-G-A-H-c

du benötigst also noch einen klangerzeuger. Deine Soundkarte hat einen Hardware-Synthesizer. Den kannste nutzen. (nachteil : Du kannst nur E-Piano-töne erzeugen).

so gehts:

Delphi-Quellcode:

uses MMSystem;

MCISendString(PChar('play ' + filepath), nil, 0, 0);

PS: ich weis nicht ob MCISendString noch aktuell ist. Vllt gehts auch mit shellexecute.

gruß snow

[Elko]

Also bei mir tut sich gar nix, wenn ich das so probiere
Gruß, Elko

[snow]

komisch ich höre was.

schau mal was unter systemsteuerung-->Sounds-und-Audiogeräte--->Audio--->MIDI-Musikwiedergabe steht. Bei mir iss es

Microsoft GS Wavetable SW Synth kannst auch mal bei

systemsteuerung-->Sounds-und-Audiogeräte--->Audio--->MIDI-Musikwiedergabe--->Lautstärke schaun, ob der SW-Synthesizer auf stumm steht.

gruß snow

[igel457]

Windows XP hat schon einen integrierten Synthesizer. Eventuell hast du einfach die Lautstärke von "SW-Synthesizer" auf ganz niedrig stehen, oder diesen auf Stumm geschaltet. Das kannst du über Start->Ausführen->sndvol32 überprüfen.

[Elko]

Oh mann, da war doch echt der SW-Synthesizer auf stumm geschaltet... ich frag mich nur wieso...
Dann geht es jetzt auch über den Mediaplayer abzuspielen!
Wenn man doch den Mediaplayer hat, für was macht man sowas dann mit MCISendString(PChar('play ' + filepath), nil, 0, 0); ? Weil man die "Features" des Mediaplayers nicht braucht, oder wieso?
Was ich ganz seltsam finde: Mit dem Windows Media-Player ging es davor auch abzuspielen (also so, dass man was gehört hat, das ist doch dann eigentlich seltsam, oder?).
Übrigens: Ja, ich habe auch Microsoft GS Wavetable SW Synth da stehen.
Viele Grüße, Elko

[snow]

Nein ist es nicht. Der WMP(Windows Media Player) besitz anscheinend eigene SoundFonts. Der spielt die instrumente also selber über den Wave-kanal ab, und beauftragt nicht die Soundkarte damit.

MCISendString(PChar('play ' + filepath), nil, 0, 0); ist sinnvoll, wenn man z.B nur mal eine Titelmusik oder mal eine Errormeldung mit ein paar Klängen aus dem Lautsprecher begleiten will.

gruß snow

[igel457]

Der Windows Media Player verwendet DirectShow, welches vermutlich einen DirectMusic MIDI Output Filter besitzt. WindowsXP beauftragt übrigens auch nicht die Soundkarte, sondern besitzt (wie oben geschreiben) einen eigenen Software-Synthesizer (auf jeden Fall unter Verwendung der Standardeinstellungen).