Delphi Wenn Lied fertig ist neues Abspielen. - Seite 2

Wenn Lied fertig ist neues Abspielen.

Ein Thema von ferby · begonnen am 6. Dez 2004 · letzter Beitrag vom 22. Nov 2006

ferby

Registriert seit: 15. Aug 2004
Ort: Wien
841 Beiträge

Delphi 2010 Enterprise

6. Dez 2004, 15:23

Hallo,

Ich habe in einer Datei 10 midis (1.mid, 2.mid ...) und starte sie wenn ich auf einen Button klick so:

Delphi-Quellcode:

			    randomize;

    y:=random(9) + 1;

    Mediaplayer.FileName := 'midi/' + inttostr(y) + '.mid';

    Mediaplayer.Open;

    Mediaplayer.Play;

Funktioniert auch, aber ich möchte jetzt, wenn ein midi zu ende ist das ein neues automatisch per zufall gespielt wird, wie mach ich das?

Ferby

Es ist dir nicht erlaubt, neue Themen zu verfassen.

Es ist dir nicht erlaubt, auf Beiträge zu antworten.

Es ist dir nicht erlaubt, Anhänge hochzuladen.

Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.

Smileys sind an.

[IMG] Code ist an.

HTML-Code ist aus.

Refbacks are aus

Gehe zu: