проблема с MediaPlayer

[Миша]

Подскажите пожалуйста как сделать так чтобы MediaPlayer не останавливался после воспроизведения дорожки а продолжал её воспроизводить снова и снова. Пробовал так:
procedure TForm1.FormCreate(Sender: TObject);
begin
MediaPlayer1.Display:=Panel1;
MediaPlayer1.FileName:='Videos1.avi ';
MediaPlayer1.Open;
MediaPlayer1.Play;
end;
Патом я пробовал так:
procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
MediaPlayer1.Play;
end;
Но программа зависает причем на столько что снять её можно только через диспетчер задач Windows.Что делать.

[Xandr]

Напишу грубо, делфи нет под рукой, но что то вроде:
If MediaPlayer1.position=l100 then
begin MediaPlayer1.position:=1;
MediaPlayer1.play; end;
А там сам смотри правельность.

[Миша]

Спасибо я тебе очень признателен.

У меня также нет под рукой
делфи

но я думаю что смогу справится позже.

[mutabor]

Миша, в событии таймера впиши этот код
if MediaPlaer1.Position = MediaPlaer1.Length then
begin
MediaPlaer1.Position:=0;
MediaPlaer1.Play;
end;

[Xandr]

mutabor, так я тоже самое написал только слету...без орфографии так сказать.

[Миша]

Таймер запускать когда при каком событии?

[Alex21]

В TForm1.MediaPlayer1Notify впиши то, что сказал mutabor.