[iOS] Открытие файла из Вашего приложения в другом приложении или Своя кнопка "Open In..."

[Дениска]

Как открыть файл из вашего приложения в другом приложении?

[Дениска]

implementation


uses
  IOUtils
  {$IFDEF IOS}
  ,iOSapi.Foundation, FMX.Platform.Ios, iOSapi.UIKit, Macapi.Helpers
  {$ENDIF}
  ;
procedure TForm1.Button1Click(Sender: TObject);
var
  fpath: string;
begin
  fpath:= TPath.GetDocumentsPath + PathDelim + 'filename.extention';
  OpenIn(fpath);
end;


procedure TForm1.OpenIn(path: string);
  {$IFDEF IOS}
var
  controller : UIDocumentInteractionController;
  URL: NSURL;
  {$ENDIF}
begin
  {$IFDEF IOS}
  URL := TNSUrl.Wrap(TNSUrl.OCClass.fileURLWithPath(StrToNSStr(path)));
  controller := TUIDocumentInteractionController.Wrap(
  TUIDocumentInteractionController.OCClass.interactionControllerWithURL(URL));
  controller.presentOpenInMenuFromRect(
      WindowHandleToPlatform(self.Handle).View.frame,
      WindowHandleToPlatform(self.Handle).View,true);
  {$ENDIF}
end;

Изменено 16 мая, 2015 пользователем Brovin Yaroslav