Android SMS gönder- Android Send SMS

Örnek 1:

//Öncelikle izinlerimizi açalım Project/Options/Permissions "app to send SMS"  seçili olmalı.
//Remember to go into Project/Options/Permissions and allow the app to send SMS. The code is:

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;
*************************************************
Örnek 2:

Try to pass empty value (nil) to the scAddress parameter of the sendTextMessage function call to use the current default SMS center:

uses
Androidapi.JNI.JavaTypes, Androidapi.JNI.Telephony;

procedure TForm1.Button1Click(Sender: TObject);
var
smsTo: JString;
smsManager: JSmsManager;
begin
smsManager := TJSmsManager.JavaClass.getDefault;
smsTo := StringToJString('091...');
smsManager.sendTextMessage(smsTo, nil, StringToJString('Test SMS'), nil, nil);
end;

  Önemli Not: Kodlarımın çoğu farklı kaynaklardan not defterlerine toplanarak biriktirilmiştir.  Bu sebeble bir çoğunda Kaynak belirtemiyorum. Bu gibi durumda olan ve kaynağını bildiğiniz bir Kod Yazım var ise yorum olarak bildirmeniz rica olur. Saygılar.