FMX.InAppPurchase.IFMXInAppPurchaseService.AddComponent

• 親: IFMXInAppPurchaseService

Delphi

procedure AddComponent(const Component: TCustomInAppPurchase);

C++

virtual void __fastcall AddComponent(TCustomInAppPurchase* const Component) = 0 ;

プロパティ

種類	可視性	ソース	ユニット	親
procedure function	public	FMX.InAppPurchase.pas FMX.InAppPurchase.hpp	FMX.InAppPurchase	IFMXInAppPurchaseService

説明

プラットフォーム サービスに保持されている、TCustomInAppPurchase およびそのサブクラスのインスタンスのリストに、指定のインスタンスを追加します。

TCustomInAppPurchase のサブクラスを作成するが、そのコンストラクタを継承しない場合は、このメソッドをコンストラクタで必ず呼び出します。

constructor MyComponent.Create(AOwner: TComponent);
var
  IAPIntf: IInterface;
begin
  if TPlatformServices.Current.SupportsPlatformService(
    IFMXInAppPurchaseService, IAPIntf) then
  begin
    FInAppPurchaseService := IFMXInAppPurchaseService(IAPIntf);
    FInAppPurchaseService.AddComponent(Self);
  end;
end;

関連項目

• FMX.InAppPurchase.IFMXInAppPurchaseService.RemoveComponent