Показать сообщение отдельно
  #2  
Старый 29.09.2016, 04:24
DrimSDK DrimSDK вне форума
Прохожий
 
Регистрация: 16.08.2016
Сообщения: 5
Версия Delphi: RAD Studio XE6
Репутация: 10
По умолчанию

Можно попробовать конвертировать. У меня пока нет возможности испытать, но попробуйте оттолкнуться от этого:

Код:
uses FMX.Surfaces, FMX.Helpers.Android, FMX.Objects, Androidapi.JNI.GraphicsContentViewText;
...
procedure TFormMain.ButtonCreatePdfClick(Sender: TObject);
var
  Canvas: JCanvas;
  Paint: JPaint;
  mBitmap: JBitmap;
  Surface: TBitmapSurface;
begin
  ...
  Surface := TBitmapSurface.Create;
  Surface.Assign(Image1.Bitmap);
  SurfaceToJBitmap(Surface, mBitmap);
  Canvas.drawBitmap(mBitmap, 0, 0, Paint);
  Surface.Free;
  ...
end;
Ответить с цитированием