Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.475 Beiträge
Delphi 12 Athens
|
AW: Programm hängt sich auf
3. Feb 2014, 23:46
Versuchs mal damit:
Delphi-Quellcode:
procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
if mediaplayer1.NotifyValue = nvSuccessful then begin
mediaplayer1.Play;
end;
end;
|