Пара вопросов по MediaPlayer

[Vladya]

Сразу обращаюсь к модераторам: пожалуйста не удаляйте мою тему, и (или) один вопрос, что бы я не засорял форум целой кучей тем по одному и тому же компоненту. У меня всего два вопроса:
№1
Как задать что бы видео воспроизводилось непрерывно? Тоесть если видео окончилось то оно автоматически начало заново прокручиваться.

№2
Как задать что бы нужное мне видео программа автоматически искала в папке с программой, или в той где храниться файл, потомучто задавать полный путь это не выход, если я переношу программу, скажем на другой диск, оно выбивает ошибку что файл не найден.

Вопросы помоему элементарные, но что то я не могу сам разобраться. Заранее всем огромнейшее спасибо.

[mutabor]

1. Или в таймере, или по событию плеера OnNotify проверяй условие:

with MediaPlayer1 do if Position = Length then Play;

2. ExtractFilePath(ParamStr(0)), ExtractFilePath(Application.ExeName )

[Vladya]

Спасибо, насчет первого я уже и сам додумался, позновато конечно...