title image


Smiley Re: Was verstehst du denn nicht?
deswegen habe ich ja auch eine nachfrage gepostet, denn ich will mich ja einarbeiten, aber dazu gibt es ja leider kaum tutorials.

In soweit wie ich jetzt bin, bin ich mit dem guten alten Langenscheid und der Delphi Hilfe gekommen.





Die Property "Notify" was du ansprichts, existiert bei mir nicht, siehe screenshot.

oder muss ich die woanders suchen?



Edit:

gefunden habe ich es jetzt, indem ich manuel:



MediaPlayer1.notify

eingegeben habe.



procedure TForm1.MediaPlayer1Notify(Sender: TObject);

begin

if MediaPlayer1.FileName='ende.wav' then

if endecounter=2 then

if mediaplayer1.Position = mediaplayer1.Length then begin

MediaPlayer1.FileName:='ende.wav';

MediaPlayer1.open;

MediaPlayer1.play;

endecounter:=1;

MediaPlayer1.Notify:=false;

end ;



procedure TForm1.Reset1Click(Sender: TObject);

begin

MediaPlayer1.Notify:=true ;

endecounter:=2;

Timer1.Enabled:=false;

MediaPlayer1.FileName:='ende.wav' {Stoppsound} ;

MediaPlayer1.open;

MediaPlayer1.play;

end;



Wenn ich jetzt aber die If abfragen rausnehme wird der ende.wav sound dauerhaft abespielt.

Wie muss ich denn den MediaPlayer1.Notify richtig einsetzten?



Gruß
HammeL
Ostfriese mit Leib und Seele.

Besser ein Schritt in die richtige Richtung, als gar keine Antwort.

Das ist nur ein Spiel, ich schiesse nur auf Polygone; ausserdem habe ich nach einer Runde Schach auch nicht das verlangen, jemand anderen wegzuschubsen, oder?

geschrieben von

Anhang
Bild 9964 zu Artikel 483487

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: