Перейти к содержанию
Fire Monkey от А до Я
  • 0

[Media Library] [TTakePhotoFromCameraAction] Как получить фото высокого качества с использованием TTakePhotoFromCameraAction?


Ufomaster

Вопрос

Как получить Image максимального качества из стандартного экшена на Android?

 

Делаю вот так 

procedure TForm1.TakePhotoFromCameraAction1DidFinishTaking(Image: TBitmap);
var
  fst: TMemoryStream;
begin
  if not IdTCPClient1.Connected then
    IdTCPClient1.Connect;
  fst := TMemoryStream.Create;
  Image.SaveToStream(fst);
  IdTCPClient1.Socket.WriteLn(IntToStr(fst.Size));
  IdTCPClient1.Socket.Write(fst);
  IdTCPClient1.Disconnect;
  fst.Free;
end;

передает фото в формате PNG. Как получить оригинал jpg  (100 % сжатия) ?

Изменено пользователем Brovin Yaroslav
Ссылка на комментарий

Рекомендуемые сообщения

Гость
Эта тема закрыта для публикации ответов.
×
×
  • Создать...