Código Delphi
[-] Intent := TJIntent.Create;
con42 := 'file://' + TPath.GetDocumentsPath + PathDelim + 'Negr.mp3';
Uri := TJnet_Uri.JavaClass.parse(StringToJString(con42));
Intent.setPackage(StringToJString('com.whatsapp'));
Intent.setAction(TJIntent.JavaClass.ACTION_SEND);
Intent.setData(Uri);
Intent.setDataAndType(Uri,StringToJString('audio/mpeg3'));
Intent.addFlags(TJIntent.JavaClass.FLAG_GRANT_READ_URI_PERMISSION);
Intent.putExtra(TJIntent.JavaClass.EXTRA_STREAM,StringToJString(con42));
De momento todo el código que pude pasar, la custion ahora seria sacar el archivo y moverlo a una carpeta para poderlo enviar.