MIDI abspielen, Problem

[Florian H]

Hi,

wenn ich versuche, mit

Code:

  MCISendString(PChar('play ' + extractFilePath(paramStr(0))+'\music.mid'), nil, 0, 0);

eine MIDI-Datei namens "music.mid" im Programmverzeichnis abzuspielen, höre ich keinen Mucks.
Es bleibt einfach alles still, keine Fehlermeldung, nix. Auch wenn ich den Dateinamen in einen nicht vorhandenen umändere, meckert er nicht. Irgendwie scheint er gar nicht auf die Datei zuzugreifen...

Was kann ich tun?

Ich habe gleichzeitig noch DelphiX mit dxSound laufen, liegt es villeicht daran? ich habe das mal kurz deaktiviert, hat nix geholfen.


grüße
florian

[beatles]

Zitat von Florian H:

Hi,

wenn ich versuche, mit

Code:

  MCISendString(PChar('play ' + extractFilePath(paramStr(0))+'\music.mid'), nil, 0, 0);

eine MIDI-Datei namens "music.mid" im Programmverzeichnis abzuspielen, höre ich keinen Mucks.
Es bleibt einfach alles still, keine Fehlermeldung, nix. Auch wenn ich den Dateinamen in einen nicht vorhandenen umändere, meckert er nicht. Irgendwie scheint er gar nicht auf die Datei zuzugreifen...

Was kann ich tun?

Ich habe gleichzeitig noch DelphiX mit dxSound laufen, liegt es villeicht daran? ich habe das mal kurz deaktiviert, hat nix geholfen.


grüße
florian

Versuche es so:
MCISendString(PChar('play ' +'\music.mid'), nil, 0, 0); So wird es sicher funktionieren, wenn es geht setze konkreten Pfad.

Zum Stoppen der Midi:

MCISendString(PChar('Stop ' +'\music.mid'), nil, 0, 0); Fiel Fergnügen!

[Florian H]

Hi,

leider geht auch das bei mir nicht :-/

grüße
florian h