1

Не могу прикрепить изображение. Ошибку не выдает, но и не прикрепляет изображение. Что не так? Куда смотреть D10.4, SDK 25

procedure TfmDecoder.SendEmail();
{$IF DEFINED(ANDROID)}
 var
  files: Tfile;
  lIntent: JIntent;
  lJRecipient: TJavaObjectArray<JString>;
  lURI: Jnet_Uri;
  lJFile: JFile;
  lFileName: string;
  lFilePath: string;
{$ENDIF}


begin
 lFileName := concat('MyPicture' ,'.jpg') ;
 lFilePath := System.IOUtils.TPath.GetPublicPath;
 lFilePath := System.IOUtils.Tpath.Combine(lFilePath, lFileName) ;
 Surf:=TBitMapSurface.Create;
   SaveParams.Quality:=100;
 try
   Surf.Assign(imResult.Bitmap);
 // Save file
   TbitMapCodecManager.SaveToFile(lFilePath, Surf, @SaveParams);
 finally
   Surf.Free;
 end;
{$IF DEFINED(ANDROID)}
  lJRecipient:= TJavaObjectArray<JString>.Create(1);
  lJRecipient.Items[0]:= StringToJString('[email protected]');

  lIntent:= TJIntent.Create;

  lIntent.setType(StringToJString('message/rfc822'));
  lIntent.setAction(TJIntent.JavaClass.ACTION_SEND);
  lIntent.setFlags(TJIntent.JavaClass.FLAG_ACTIVITY_NEW_TASK);
  lIntent.putExtra(TJIntent.JavaClass.EXTRA_EMAIL, lJRecipient);
  lIntent.putExtra(TJIntent.JavaClass.EXTRA_SUBJECT, StringToJString('Subj'));
  lIntent.putExtra(TJIntent.JavaClass.EXTRA_TEXT, StringToJString(AllSub));


  lIntent.putExtra(TJIntent.JavaClass.EXTRA_FROM_STORAGE,
    TJParcelable.Wrap(TJnet_Uri.JavaClass.fromFile(
        TJFile.JavaClass.init(StringToJString(lFilePath)))));
  lIntent.setType(StringToJString('vnd.android.cursor.dir/email'));
  try
    TAndroidHelper.Activity.startActivity(lIntent);
  except
    on E: Exception do
    begin
      Label1.Caption:= E.Message;
    end;
  end;
  Files.Delete(lFilePath);
  {$ENDIF}
end;
6
  • Видимо ANDROID определена? В режиме отладки пройтись по всей цепочке, определить где теряются данные.
    – Vlad Chapl
    27 мая 2023 в 19:52
  • Нашел вот тут нечто похожее. Не знаю как это прикрутить к Делфи. Если не сложно, подскажите. ru.stackoverflow.com/questions/762534/…
    – Юрий
    28 мая 2023 в 10:17
  • URI нужно передавать а не само изображение через Intent.EXTRA_STREAM
    – Style-7
    29 мая 2023 в 3:19
  • @Style-7 Да, попробовал через FileProvider передать.... Дык теперь URI (вот тут stackoverflow.com/questions/76357675/…) не могу сформировать. Думаю ошибка в пути на картинку.... Как ее поправить не знаю. Я еще сильно "зеленый" в Андроиде. Если вдруг окажется возможность, гляньте что я в путях намутил? И спасибо за ответ
    – Юрий
    29 мая 2023 в 14:56
  • Сначала сохраните картинку через ContentResolver.insert он вернет URI (естественно нельзя сохранять во внутреннем хранилище)
    – Style-7
    29 мая 2023 в 15:50

0

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge you have read our privacy policy.

Посмотрите другие вопросы с метками или задайте свой вопрос.