Как Отправить Смс Через Андроид С Помощью Delphi/ How To Send Sms With Delphi On Androi

[Lomanu4]

Не забываем в permessing добавлять send SMS

Спойлер: Сам код

[HIDE=5]

uses
  FMX.Helpers.Android,
  Androidapi.JNI.GraphicsContentViewText,
  Androidapi.JNI.Net,
  Androidapi.JNI.JavaTypes,
  Androidapi.JNI.Telephony;

procedure SendSMS (target,messagestr:string);
var
  smsManager: JSmsManager;
  smsTo: JString;
begin
  smsManager:= TJSmsManager.JavaClass.getDefault;
  smsTo:= StringToJString(target);
  smsManager.sendTextMessage(smsTo, nil, StringToJString(messagestr), nil, nil);
end;

[/HIDE]