Thema: Delphi MIDI abspielen, Problem

Einzelnen Beitrag anzeigen

beatles

Registriert seit: 17. Jan 2004
24 Beiträge
 
#2

Re: MIDI abspielen, Problem

  Alt 19. Jan 2004, 00:50
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!
  Mit Zitat antworten Zitat