Работает на Java (android studio)
public void onClick(View v) {
Intent intent = new Intent();
intent.putExtra("GPS_Широта", Glla);
intent.putExtra("GPS_Долгота", Gllt);
intent.putExtra("NET_Широта", Nlla);
intent.putExtra("NET_Долгота", Nllt);
finish();
}
на работает в Дельфи
procedure TForm1.Button6Click(Sender: TObject);
var
Intent: JIntent;
begin
Intent := TJIntent.Create;
Intent.setType(StringToJString('text/plain'));
Intent.putExtra(StringToJString('GPS_Долгота'),StringToJString(d));
Intent.putExtra(StringToJString('GPS_Широта'),StringToJString(s));
Intent.putExtra(StringToJString('NET_Долгота'),StringToJString(d));
Intent.putExtra(StringToJString('NET_Широта'),StringToJString(s));
form1.close;
end;
1С ругается и не видит от правленые данные