[fpc-devel] Free Pascal JVM and Android media player API call issue
Mgr. Janusz Chmiel
janusz.chmiel at volny.cz
Sun Mar 31 18:39:10 CEST 2019
My name is Janusz Chmiel. I have found amazing project from 2017
I AM sad, because I do not know, why I can not call Android Media player
The main source of my attempt is here.
Nobody elsewhere do not want to give Me a piece of advice, what I Am
doing wrong? And this project is The onlyone non visual based bundle,
which can I use as a user with no sight at all, since modern projects
based on visual designers are less useful for Me. Because I do notsee on
The computer screen so I can not determine which values for object
positioning should I put inside .lfm file.
Thank you very very much for yours help.
uses _System, Classes, Controls, Dialogs, Forms, GenChars, LCLIntf,
Menus, StdCtrls, SysUtils, androidr22;
TFormMain = class(TForm)
jMediaPlayer1: AMMediaPlayer ;
procedure ButtonClick(A: TObject);
constructor Create(A: TComponent); override;
constructor TFormMain.Create(A: TComponent);
Caption := Application.Title;
PlayButton.Align := alTop;
PlayButton.Parent := Self;
PlayButton.Caption := 'Play live stream';
PlayButton.OnClick := @ButtonClick;
procedure TFormMain.ButtonClick(A: TObject);
if A = PlayButton then begin
What should I had to do to make my little player working? What I Am
doing wrong? Or it is impossible to call Android APISby using this old
Thank you very much for yours time and for yours patience with my plea.
With warmest regards.
More information about the fpc-devel