Java Servecie

[Ali Ezzeddine]

65/5000

 

 

 

Уважаемые,
Есть ли способ вызвать сервис Java из приложения Delphi FMX?

[aleksandrguru]

Да был вроде , раньше так делал 

procedure THomeForm.FormShow(Sender: TObject);
var
{$IFDEF ANDROID}
  Intent: JIntent;
   {$ENDIF }
    c:Integer;
begin
 
    Loadsetinngs;
    {$IFDEF ANDROID}
    FServiceConnection1 := TLocalServiceConnection.Create;
    FServiceConnection1.StartService('RecordService');

    Intent := CreateIntent(SERVICE_NAME, 1, st); // запускаем историю
    TAndroidHelper.Activity.startService(Intent); // // запускаем историю

    Intent := CreateIntent(SERVICE_NAME, 2, st); // запускаем топ
    TAndroidHelper.Activity.startService(Intent); // // запускаем топ
     {$ENDIF }
end;

Запускал разные задачи в сервисе