Проигрывание видео в Delphi

[doktor255]

procedure TForm1.FormCreate(Sender: TObject);
begin
WindowsMediaPlayer1.URL := 'E:\777.avi';
end;

[raxp]

...при OnCreate() приложения пропишите загрузку и будет вам счастье.

[Tboy]

Хочу закинуть программку на диск.
1) Как прописать новый путь к видеофайлу из диска?
2) и если закинуть в архив как прописать путь?
И можете скинуть листинг вашей программы? интересно...

[raxp]

...используйте относительный путь.

[Tboy]

Проект вышел, но долго открывает видеолфайл, а мне нужно чтобы переход был незаметным( Я объединил 2 видео и написал код, который выложил! Не выходит!

[raxp]

В вашем проекте ничего из данных мною ранее рекомендацией не выполнено.