Converts Java .jar files, .class files and folders to Delphi/C++ Builder units for Android.

Imported Android Toast API example:

type
  JToast = interface; {android/widget/Toast}

  JToastClass = interface(JObjectClass)
    ['{E61774E0-AF9E-4524-835D-2DA59F11D5BB}']
    function _GetLENGTH_LONG: Integer;
    function _GetLENGTH_SHORT: Integer;
    function init(context: JContext): JToast; cdecl;
    function makeText(context: JContext; text: JCharSequence; duration: Integer): JToast; cdecl; overload;
    function makeText(context: JContext; resId: Integer; duration: Integer): JToast; cdecl; overload;
    property LENGTH_LONG: Integer read _GetLENGTH_LONG;
    property LENGTH_SHORT: Integer read _GetLENGTH_SHORT;
  end;

  [JavaSignature('android/widget/Toast')]
  JToast = interface(JObject)
    ['{AD2DFB9B-3F35-4012-8459-2B518252B405}']
    procedure cancel; cdecl;
    function getDuration: Integer; cdecl;
    function getGravity: Integer; cdecl;
    function getHorizontalMargin: Single; cdecl;
    function getVerticalMargin: Single; cdecl;
    function getView: JView; cdecl;
    function getXOffset: Integer; cdecl;
    function getYOffset: Integer; cdecl;
    procedure setDuration(duration: Integer); cdecl;
    procedure setGravity(gravity: Integer; xOffset: Integer; yOffset: Integer); cdecl;
    procedure setMargin(horizontalMargin: Single; verticalMargin: Single); cdecl;
    procedure setText(resId: Integer); cdecl; overload;
    procedure setText(s: JCharSequence); cdecl; overload;
    procedure setView(view: JView); cdecl;
    procedure show; cdecl;
  end;

  TJToast = class(TJavaGenericImport)
  end;

const
  TJToast_LENGTH_LONG = 1;
  TJToast_LENGTH_SHORT = 0;

implementation

procedure RegisterTypes;
begin
  TRegTypes.RegisterType('android.widget.Toast.JToast', TypeInfo(android.widget.Toast.JToast));
end;

initialization
  RegisterTypes;
end.

Only for V.I.P