Как прописать путь к видео, чтобы при запуске приложения видео начинало работать?

@ядщ20134 · Регистрация: 22.10.2016

как прописать путь к видео чтоб при запуске приложения видео начинало работать? и можно было запустить приложение на любом пк??

@cfbogd · 18.03.2017, 21:02

Уважаемый, тут вопрос не как, а где, ведь почти любой код можно нагуглить

Delphi

procedure TForm1.FormShow(Sender: TObject);
begin
MediaPlayer1.DeviceType:= dtAutoSelect;
MediaPlayer1.FileName := 'C:\test.avi';
MediaPlayer1.Display:=Panel1;
MediaPlayer1.Open;
MediaPlayer1.Play;
end;

где MediaPlayer - компонент, который находиться на вкладке System
panel1 - некий прямоугольник, в котором будет отображаться видео

@HiredKiller · 18.03.2017, 21:53

Delphi

1	extractfilepath(Forms.application.ExeName)+ '\test.avi'

@krapotkin · 18.03.2017, 22:22

слэш не нужен
и вместо application.exeName, которое тянет за собой модуль Forms
лучше использовать старорежимное paramStr(0)
тем более, что :

Delphi

function Tapplication.ExeName:string;
begin
  result := paramStr(0)
end;

)))

DenNik · 19.03.2017, 13:54

HiredKiller, изучи разницу между ExtractFilePath() и ExtractFileDir()

@droider · 19.03.2017, 14:33

Сообщение от ядщ20134

как прописать путь к видео чтоб при запуске приложения видео начинало работать? и можно было запустить приложение на любом пк??

ядщ20134, Вы бы мне лучше здесь отвели Добавление видео на форму, прежде чем плодить темы.

Не по теме:

Только и умеете темы создавать, а самому включить извилины серого вещества и найти всегда сложно. Деятели!

Добавлено через 2 минуты

Сообщение от cfbogd

Delphi

1	MediaPlayer1.FileName := 'C:\test.avi';

а если у ТС-у понадобится воспроизвести не avi, а mp4 ? Тогда он пойдет лесом со своим TMediaPlayer-ом.

Я поэтому спрашивал его, но ответить он не додумался.

@ядщ20134 · 20.03.2017, 22:25 **[ТС]**

droider, мне надо mp4

@cfbogd · 20.03.2017, 23:11

проще уже переформатировать в avi
или, внимательно читать посты уважаемого droider'а.

@droider · 21.03.2017, 09:22

Сообщение от ядщ20134

мне надо mp4

еще раз даю ссылку Докопаться до сути TWindowsMediaPlayer

Сообщение от cfbogd

проще уже переформатировать в avi

каждый раз для просмотра ролика в mp4 формате?? Не думаю.

ядщ20134, для ясности еще статья Установка компонента ActiveX Windows Media Player.

@krapotkin · 21.03.2017, 11:07

можете скачать отличный компонент. он бесплатен для некоммерческого пользования
http://mitov.com/products/basicvideo#overview

@droider · 21.03.2017, 11:10

Не по теме:

Сообщение от krapotkin

можете скачать отличный компонент

и тут же появятся вопросы как его установить :)

@Cold · 21.03.2017, 11:15

Как сделать, чтобы при запуске программы включалось видео

@droider · 21.03.2017, 11:19

Cold, оставьте TMediaPlayer в покое. Сказано ведь

Сообщение от ядщ20134

мне надо mp4

а вот это

Сообщение от cfbogd

переформатировать в avi

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

@Cold 87 / 87 / 65 Регистрация: 22.05.2014 Сообщений: 485
	21.03.2017, 11:15	12
	Как сделать, чтобы при запуске программы включалось видео 0

@ядщ20134 0 / 0 / 1 Регистрация: 22.10.2016 Сообщений: 65
		1
	Как прописать путь к видео, чтобы при запуске приложения видео начинало работать? 18.03.2017, 20:32. Показов 1009. Ответов 12 Метки нет (Все метки) как прописать путь к видео чтоб при запуске приложения видео начинало работать? и можно было запустить приложение на любом пк?? 0

DenNik Житель Земли 2838 / 2709 / 375 Регистрация: 26.07.2011 Сообщений: 10,771 Записей в блоге: 1
	19.03.2017, 13:54	5
	HiredKiller, изучи разницу между ExtractFilePath() и ExtractFileDir() 0

@ядщ20134 0 / 0 / 1 Регистрация: 22.10.2016 Сообщений: 65
	20.03.2017, 22:25 [ТС]	7
	droider, мне надо mp4 0

@cfbogd botsik 262 / 262 / 140 Регистрация: 05.06.2016 Сообщений: 1,247 Записей в блоге: 1
	20.03.2017, 23:11	8
	проще уже переформатировать в avi или, внимательно читать посты уважаемого droider'а. 0

@droider 4668 / 2655 / 832 Регистрация: 04.10.2012 Сообщений: 9,677
	21.03.2017, 09:22	9
	Сообщение от ядщ20134 мне надо mp4 еще раз даю ссылку Докопаться до сути TWindowsMediaPlayer Сообщение от cfbogd проще уже переформатировать в avi каждый раз для просмотра ролика в mp4 формате?? Не думаю. ядщ20134, для ясности еще статья Установка компонента ActiveX Windows Media Player. 0

@krapotkin 4935 / 3842 / 1279 Регистрация: 14.04.2014 Сообщений: 17,732 Записей в блоге: 18
	21.03.2017, 11:07	10
	можете скачать отличный компонент. он бесплатен для некоммерческого пользования http://mitov.com/products/basicvideo#overview 0

@droider
	21.03.2017, 11:10 #11
	Не по теме: Сообщение от krapotkin можете скачать отличный компонент и тут же появятся вопросы как его установить :) 0

@droider 4668 / 2655 / 832 Регистрация: 04.10.2012 Сообщений: 9,677
	21.03.2017, 11:19	13
	Cold, оставьте TMediaPlayer в покое. Сказано ведь Сообщение от ядщ20134 мне надо mp4 а вот это Сообщение от cfbogd переформатировать в avi уже будет неправильно и неудобно для конечного пользователя. 0

Опции темы