Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#7

Re: Sound abspielen MediaPlayer ist zu langsam mmsystem läuf

  Alt 16. Apr 2005, 10:43
also mit folgendem befehl kannst du deine datei schonmal laden
mciSendString(PChar('open "' + fFilename + '" alias ' + fAliasName), nil, 0, 0) und so spielst du sie dann hab
Delphi-Quellcode:
var LGenericParams: TMCI_Generic_Parms;
begin
  LGenericParams.dwCallback := 0;
  mciSendCommand(fAliasHandle, MCI_PLAY, MCI_NOTIFY, Cardinal(@LGenericParams))
fAliasName ist dabei ein String (kannst dir irgend einen Aliasnamen ausdenken) und fFilename ist ebenso ein String mit dem Dateinamen
achja, schließen des ganzen nicht vergessen
    mciSendString(PChar('close ' + fAliasName), nil, 0, 0); Du kannst das ganze natürlich auch noch einfacher schreiben, habs nur bei mir aus nem project rauskopiert.. Achja, zum Betreff: hast zwar geschrieben das mmsystem nicht läuft wobei mmsystem doch aber eigentlich ne Unit ist?! falls du mci meinst dann würd ichs nicht verstehen weil der TMediaPlayer auch die MCI-Commandos nutzt.
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat