|
Работа со
MEDIAPLAYER
Прво се подига програмскиот јазик Delphi
и се прави избор на нова апликација File->NEW Application.
Се поставува една
компонента MediaPlayer1
од палетата со компоненти
System,
еден Button so
Caption - Otvori
од палетата со компоненти
Standard,
еден OpenDialog од
палетата со компоненти Dialogs,
една компонента
Animate од
палетата со компоненти
Wiin32.
Потоа се поставуваат филтри на
OpenDialog1
-
се селектира OpenDialog1 и во
Object Inspector-> Filter se
дефинираат кои типови на датотеки Ќе се отвораат;
Се притиска на трите точки кај Filter
и се впишува следното во двете колони:*.wav, *.mp3, *.avi
и сл.
Потоа се селектира MediaPlayer1
и во Object Inspector-> Display се бира компонентата
Animate1.
Потоа се селектира
Button1 и се впишува следниот
код:
opendialog1.Execute; // го
отвора диалог прозорецот за избор на датотека
mediaplayer1.FileName:=opendialog1.FileName; // името на избраната
датотека му се дава на
MediaPlayer1
mediaplayer1.Open; // го
активира MediaPlayer1
|
|