Имею следующее:

Яndex по поводу 'изящно закрытого соединения' говорит, что это - не ошибка, а просто "та сторона" (в данном случае Big Sur) неожиданно (для Делфи) его закрыла. А предыстория такая: начитался, накачался, установился/распаковался и вперёд... Благо - paserver.pkg прямо drag-and-dropом прямо из винкомандёра на рабочий стол БигСура скопировался, там установился и... результат - на картинке... и только потом вычитал, что сначала надо обновить систему и ХКоде до последней версии и, как вариант, этот образ в мусорку - распаковал по-новой, обновил, установил XCode и (О, Чудо!!!) увидел АйПад симулятора - вот только не помню в какой момент в терминале ПаСервера выскочила ошибка 231: когда прогрессбар под яблоком ещё "тикал" или когда уже появился рабочий стол... И по ходу немыслимых эксКриментов дело дошло до "Формат Ц" (с ресетапом винды), но "... воз и ныне там ...".

Как побороть эту ошибку (231)??? Печёнкой чую, что где-то есть *.log в котором чёрным по белому "до безобразия разжёвано" что (и где) за фигня происходит... Вот только где этот *.лог искать? Покопался в папке /Users/admin/PAServer и Финдером, и Оне Коммандером, но ничё похожего не нашёл... Какие будут предложения/замечания/.../нравоучения?

ЗаРанее благодарен

uses
  FMX.Helpers.iOS, iOSapi.Foundation

function OpenURL(const AUrl: string): Boolean;
var
  Url: NSURL;
begin
  Url := TNSUrl.Wrap(TNSUrl.OCClass.URLWithString(NSStr(AUrl)));
  Result := SharedApplication.openUrl(Url);
end;

А на С++ не получается:

#include <FMX.Helpers.iOS.hpp>
#include <iOSapi.Foundation.hpp>
void __fastcall TForm1::Text1Click(TObject *Sender)
{
  NSURL Url;//<- как тут правильно?
  //***               

  /* для андроида
   _di_JIntent Intent;
  Intent = TJIntent::JavaClass->init(TJIntent::JavaClass->ACTION_VIEW);
  Intent->setDataAndType(StrToJURI(L"http://bigburger.cv.ua/index.php"), StringToJString(L"text/html"));
  SharedActivity()->startActivity(Intent);
  */
}  

[bcciosarm Error] UnitBigburger.cpp(29): variable type 'Iosapi::Foundation::NSURL' is an abstract class
 

Delphi Rio

При использовании LocationSensor в Android всё работает отлично. В iOS постоянно выдает NAN, не зависимо от аппарата и SDK.

    NotificationCenter1.PresentNotification(MyNotification);

а так норм
 

    MyNotification.FireDate := IncSecond(Now, 1);
    NotificationCenter1.ScheduleNotification(MyNotification);

по идее, если мне нужно мгновенное уведомление, то можно использовать PresentNotification.

Delphi Tokyo.

Штатных заголовков нет, поэтому я выгрузил iOSapi.PassKit.pas с самого SDK, в итоге получил вот следующий файл.

Что было выяснено:

1) Необходимо сгенерировать запрос на платеж PKPaymentRequest (ГОТОВО, правда почему то пока не получается добавить потдерживаемые платежные системы (setSupportedNetworks) и строки позиций (setPaymentSummaryItems) но на текущем этапе это не так важно и может подождать)

2) Необходимо создать PKPaymentAuthorizationViewController и обрабатывать результат его работы в PKPaymentAuthorizationViewControllerDelegate. А вот с этим возникли трудности из за отсутствия опыта. Может быть есть у кого нибуlь опыт по работе с SDK iOS.

т.е. у нас есть

PKPaymentAuthorizationViewControllerClass = interface(UIViewControllerClass)

PKPaymentAuthorizationViewController = interface(UIViewController)

TPKPaymentAuthorizationViewController = class

PKPaymentAuthorizationViewControllerDelegate = interface(IObjectiveC)

и их надо как то вместе соединить.

На текущий момент у меня получилось примерно следующее:

Цитата

procedure TApplePay.test;
var
  LocalPKPaymentRequest: PKPaymentRequest;
  LocalPKPaymentAuthorizationViewController: PKPaymentAuthorizationViewController;
  LocalPKPaymentSummaryItem: PKPaymentSummaryItem;

  LocalPKPaymentAuthorizationControllerDelegate: PKPaymentAuthorizationControllerDelegate;

  FMainWindow: UIWindow;

  supportedNetworks: NSMutableArray;
  paymentSummaryItems: NSMutableArray;
begin
  LocalPKPaymentRequest := TPKPaymentRequest.Wrap(TPKPaymentRequest.Alloc.init);
  LocalPKPaymentAuthorizationViewController := TPKPaymentAuthorizationViewController.Wrap(TPKPaymentAuthorizationViewController.Alloc.init);
  LocalPKPaymentAuthorizationControllerDelegate := TPKPaymentAuthorizationControllerDelegate.Wrap(TPKPaymentAuthorizationControllerDelegate.Alloc.init);

  if not Assigned(LocalPKPaymentRequest) or not Assigned(LocalPKPaymentAuthorizationViewController) then
    Exit;

  LocalPKPaymentRequest.setMerchantIdentifier(NSStr('merchant.ru.ХХХ.ХХХХХХХ'));

  {//нехатит добавляться типы платежных систем
  supportedNetworks := TNSMutableArray.Create;
  supportedNetworks.addObject(PKPaymentNetworkMasterCard);
  supportedNetworks.addObject(PKPaymentNetworkMasterCard);
  supportedNetworks.addObject(PKPaymentNetworkAmex);
  LocalPKPaymentRequest.setSupportedNetworks(supportedNetworks);}

  LocalPKPaymentRequest.setMerchantCapabilities(PKMerchantCapability3DS);
  LocalPKPaymentRequest.setCountryCode(NSStr('RU'));
  LocalPKPaymentRequest.setCurrencyCode(NSStr('RUB'));

  {//нехатит добавляться позиции
  LocalPKPaymentSummaryItem := TPKPaymentSummaryItem.Wrap(TPKPaymentSummaryItem.Alloc.init);
  LocalPKPaymentSummaryItem.setLabel(NSStr('qwe'));
  LocalPKPaymentSummaryItem.setAmount(TNSDecimalNumber.Wrap(TNSDecimalNumber.OCClass.numberWithFloat(10.2)));
  LocalPKPaymentSummaryItem.setType(1);
  paymentSummaryItems := TNSMutableArray.Create;
  paymentSummaryItems.addObject(LocalPKPaymentSummaryItem);
  LocalPKPaymentRequest.setPaymentSummaryItems(paymentSummaryItems);}

  LocalPKPaymentAuthorizationViewController.initWithPaymentRequest(LocalPKPaymentRequest);
  FMainWindow := TUIApplication.Wrap(TUIApplication.OCClass.sharedApplication).keyWindow;
  if Assigned( FMainWindow ) and Assigned(FMainWindow.rootViewController) then
    FMainWindow.rootViewController.presentViewController(LocalPKPaymentAuthorizationViewController, True, ViewControllerCompletion);

end;

Валится на строчке FMainWindow.rootViewController.presentViewController(LocalPKPaymentAuthorizationViewController, True, ViewControllerCompletion);

Буду рад любой помощи, даже ссылкам на документы которые позволят мне в этом разобраться.

iOSapi.PassKit.rar

  Intent := TJIntent.Create;
  Intent.setAction(TJIntent.JavaClass.ACTION_VIEW);
  URI:=TJnet_Uri.JavaClass.parse(StringToJString('.......1.pkpass'));
  Intent.setData(URI);
  TAndroidHelper.Activity.startActivity(Intent);

После этого действия у пользователя дается возможность выбрать каким именно приложением можно открыть этот файл. В случае с iOS у меня не получилось реализовать подобное. В идеале, это нужен способ, по аналогии с отправкой почты (может он есть а я его просто не нашел):

  lURL := 'mailto://'+aEmail;
  if (aSubject<>'') or (aBody<>'') then
  begin
    lURL := lURL+'?subject='+TIdURI.ParamsEncode(aSubject);
    if aBody<>'' then
      lURL := lURL+'&body='+TIdURI.ParamsEncode(aBody);
  end;
  NSU := StrToNSUrl(lURL);
  if SharedApplication.canOpenURL(NSU) then
    SharedApplication.openUrl(NSU)
  else
  begin
    ShowMessage('Error: Opening! Not supported.');
    exit();
  end;

Пока единственный способ который я нашел, это открыть файл штатным веббраузером:

    Url := TNSUrl.Wrap(TNSUrl.OCClass.URLWithString(StrToNSStr(URLS)));
    SharedApplication.openUrl(Url);

Но в этом случае у нас появляется посредник - браузер, а нужно именно без лишнего посредника, т.е. нажали на кнопку, а либо запустилось приложение Wallet, либо просто оно установило карту.

Есть идеи как такое можно реализовать?

п.с. также пробовал через TShowSharedSheetAction, указывая в поле TextMessage путь до файла, но из вариантов куда передать это событие программы Wallet не было

void __fastcall TForm1::TakePhotoFromCameraAction1DidFinishTaking(TBitmap *Image)
{
 Image1->Bitmap->Assign(Image);
}

При нажатии на кнопку приложение вылетает. Кому нибудь удавалось получить фото в С++ Builder Берлин в iOS? Спасибо.

Можно ли получить доступ к данным программы "Здоровье"?

Подскажите в каком направлении искать.

Т.е. чтобы гарантировано происходили события компонента TBeacon - вход/выход из зоны (OnBeaconBeaconEnter и др.).

В андроиде эти события происходят и тогда, когда приложение переведено в фон.

http://community.embarcadero.com/blogs/entry/how-to-vibrate-ios-and-android-phones-using-firemonkey-and-xe8

unit UVibrate;
 
interface
 
procedure Vibrate;
 
implementation
 
{$IFDEF ANDROID}
uses
  Androidapi.JNI.Os,
  Androidapi.JNI.GraphicsContentViewText,
  Androidapi.Helpers,
  Androidapi.JNIBridge;
{$ENDIF}
{$IFDEF IOS}
uses
  IOSapi.MediaPlayer,
  IOSapi.CoreGraphics,
  FMX.Platform,
  FMX.Platform.IOS,
  IOSapi.UIKit,
  Macapi.ObjCRuntime,
  Macapi.ObjectiveC,
  iOSapi.Cocoatypes,
  Macapi.CoreFoundation,
  iOSapi.Foundation,
  iOSapi.CoreImage,
  iOSapi.QuartzCore,
  iOSapi.CoreData;
{$ENDIF}
 
{$IFDEF IOS}
const
  libAudioToolbox = '/System/Library/Frameworks/AudioToolbox.framework/AudioToolbox';
  kSystemSoundID_vibrate = $FFF;
 
procedure AudioServicesPlaySystemSound( inSystemSoundID: integer ); cdecl; 
External libAudioToolbox Name _PU + 'AudioServicesPlaySystemSound';
{$ENDIF}
 
procedure Vibrate;
{$IFDEF ANDROID}
var
  Vibrator: JVibrator;
{$ENDIF}
begin
{$IFDEF ANDROID}
  Vibrator := TJVibrator.Wrap((SharedActivityContext.getSystemService(TJContext.JavaClass.VIBRATOR_SERVICE) 
as ILocalObject).GetObjectID);
  // Vibrate for 500 milliseconds
  Vibrator.vibrate(500);
{$ENDIF}
{$IFDEF IOS}
  AudioServicesPlaySystemSound( kSystemSoundID_vibrate );
{$ENDIF}
end;
 
end.

Подключаю этот *.pas к проекту C++ и компилирую. Полученный hpp файл включаю в проект:

#include "UVibrate.hpp"
#include "Unit1.h"
 
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  Vibrate();
}

Теперь ошибка, которую не знаю как исправить. Может кто знает?

[ld Error] Error: "_AudioServicesPlaySystemSound", referenced from: __ZN8Uvibrate28AudioServicesPlaySystemSoundEi in .\ \iOSDevice32\ \Debug\ \UVibrate.o;
[ld Warning] ld: symbol(s) not found for architecture armv7

void __fastcall TForm1::Button3Click(TObject *Sender)
{
	if (NotificationCenter1->Supported())
	{
	TNotification *myNotification = NotificationCenter1->CreateNotification();
 	__try {
			myNotification->Number = 18;
			myNotification->AlertBody = L"C++ for your mobile device is here! Привет.";
			NotificationCenter1->PresentNotification(myNotification);
            ShowMessage(L"Проверка");//<--- вижу сообщение
		  }
	   __finally
		   {
			myNotification->DisposeOf();
		   }
	}
}

А в шторке пусто...

__fastcall TForm1::TForm1(TComponent* Owner)
	: TForm(Owner)
{
 Beacon1->Enabled = true;
}

При запуске приложения возникает окно с предложением включить геолокацию, в котором не успеваешь нажать и тут же приложение вываливается.

2. Пробую другой код:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   ShowMessage(L"Включаем");
   Beacon1->Enabled = true;
}

Получаю ошибку на картинке. На андроиде все нормально. RAD Берлин апдейт 1. Как быть? Спасибо.

Компилирую и получаю на 5-ом айфоне приложение.

Нажимаю кнопку и приложение падает.

В приложении одна строчка кода:

void __fastcall TAccessCameraAppForm::TakePhotoFromCameraAction1DidFinishTaking
	(TBitmap *Image)
{
	/* Assign the image retrieved from the Camera to the TImage component. */
	imgCameraImage->Bitmap->Assign(Image);
}

Вопрос: можно ли создавать простейшие приложения для iOS в С++ Builder Berlin или все это маркетинговый код и студия С++ бесполезна и я зря трачу время?

Если простейшие приложения для iOS можно создавать на С++ Builder Berlin то куда посоветуете копать в данном случае для стандартного примера, чтобы избежать падения приложения?

Спасибо.

Delphi/iOS