Delphi(Firemonkey)/Intent[2]Звонок и SMS-сообщения
Продолжаем изучать Intent(Намерения) в android. Сегодня мы рассмотрим звонок и отправку Sms-сообщения из вашего приложения.
Незамысловатый дизайн...
На форме нам понадобятся edit, memo и 2 кнопки. Edit хранит номер телефона, memo - смс сообщение. Перейдем к коду.
1)В разделе uses нужно прописать несколько новых модулей:
Androidapi.JNI.GraphicsContentViewText,
Androidapi.JNI.JavaTypes,
FMX.Helpers.Android,
Androidapi.JNI.Net;
2)Код кнопки "Позвонить"
procedure TForm1.Button2Click(Sender: TObject);
var Intent: JIntent;
URI: Jnet_Uri; //переменная содержащая телефон
begin
Intent:=TJIntent.Create; //создаем новое намерение
Intent.setAction(TJIntent.JavaClass.ACTION_CALL); //назначаем действие на активность(ACTION_CALL-позвонить)
URI:=TJnet_Uri.JavaClass.parse(StringToJString('tel:'+edit1.text)); //'tel:+123456789'-запиьсь данных в URI
Intent.setData(URI); //запись данных в переменную Intent
SharedActivity.startActivity(Intent); //запуск активности
end;
3)Код кнопки "Отправить СМС" //код как при звонке, кроме двух строк.
procedure TForm1.Button1Click(Sender: TObject);
var Intent:JIntent;
URI:Jnet_Uri;
begin
Intent:=TJIntent.Create;
Intent.setAction(TJIntent.JavaClass.ACTION_VIEW); //назначаем действие на активность(ACTION_VIEW-отправка смс)
Intent.setData(StrToJURI('sms:'+edit1.Text+'?body='+memo1.text)); //'sms:+123456789?body=текст смс'
SharedActivity.startActivity(Intent);
end;
Вот и все! Успехов!
Комментарии:
Нету комментариев для вывода...