petyaas Опубликовано 18 августа, 2018 Опубликовано 18 августа, 2018 надо набрать ussd команду: var Intent: JIntent; URI: Jnet_Uri; begin Intent := TJIntent.Create; Intent.setAction(TJIntent.JavaClass.ACTION_DIAL); Intent.setData(StrToJURI('tel:*0809#')); SharedActivity.startActivity(Intent); end; при наборе исчезает #
2 petyaas Опубликовано 18 августа, 2018 Автор Опубликовано 18 августа, 2018 разобрался: procedure tform1.nabor(num:string); var Intent: JIntent; URI: Jnet_Uri; number:jstring; number1:string; begin Intent:=TJIntent.Create; Intent.setAction(TJIntent.JavaClass.ACTION_DIAL); number:=TJnet_Uri.JavaClass.encode(StringToJString(num)); number1:=jstringtostring(number); Intent.setData(StrToJURI('tel:'+number1)); SharedActivity.startActivity(Intent); end; Евгений Корепов 1
Вопрос
petyaas
надо набрать ussd команду:
var
Intent: JIntent;
URI: Jnet_Uri;
begin
Intent := TJIntent.Create;
Intent.setAction(TJIntent.JavaClass.ACTION_DIAL);
Intent.setData(StrToJURI('tel:*0809#'));
SharedActivity.startActivity(Intent);
end;
при наборе исчезает #
1 ответ на этот вопрос
Рекомендуемые сообщения