adding video on android app using delphi firemonkey

  

I have been looking everywhere for help for below task :

Whats the easy way to add a video file and just on button click play the video on a android device. Everytime when it run the code, and when i press the button it shows black screen and then it closes .

Here is my code :

procedure TForm3.Button1Click(Sender: TObject);
begin
mediaplayer1.FileName := ‘c:sapoavi2.avi’;
if MediaPlayer1.Media <> nil then
begin
MediaPlayer1.Play;
end;

Also, i have a mediaplayercontrol box to display the video.

Any help will be really appreciated.

Comments are closed.