[wolfran_hack]

Ya casi esta, solo que tiene un error:

Código Delphi [-]
//Copia el Archivo a Directorio Temp.
TFile.Copy(TPath.GetDocumentsPath + PathDelim + 'archivo.mp3', TPath.GetTempPath + PathDelim + 'archivo.mp3');

//Tomamos el Archivo de Temp.
con42 := TPath.GetTempPath + PathDelim + 'archivo.mp3';

an_intent := TJIntent.Create;
an_intent.setAction (TJIntent.JavaClass.ACTION_SEND);
an_intent.setType (StringToJString('audio/mpeg3'));
fileuri := JParcelable (TJNet_Uri.JavaClass.fromFile(TJFile.JavaClass.init (StringToJString (con42))));
an_intent.putExtra (TJIntent.JavaClass.EXTRA_STREAM, fileuri);
SharedActivity.startActivity (TJIntent.JavaClass.createChooser(an_intent, StrToJCharSequence ('Share With')));

Funciona la primera vez, despues dice un error de "The Specified file already exists."