Почему этот код камеры в Delphi 12 дает сбой на Android?Android

Форум для тех, кто программирует под Android
Ответить
Anonymous
 Почему этот код камеры в Delphi 12 дает сбой на Android?

Сообщение Anonymous »

У нас есть этот код, который долгое время работал в Delphi 11.x. Однако это приводит к сбою приложения в Delphi 12.1. Он имеет необходимые разрешения «камеры» Android, как указано ранее. Есть ли что-то, что я пропустил в Delphi 12.1? Разрешения также стандартны и работают в соответствии с версией 11.x.
Есть какие-нибудь указания, на что следует обратить внимание? Однако функция «Выбрать фотографию из альбома» работает! (все это произошло без изменения кода с 11.x на 12.1):
var
Params: TParamsPhotoQuery;
begin

if TPlatformServices.Current.SupportsPlatformService(IFMXCameraService,
FCameraService) then
begin
Params.Editable := False;
Params.NeedSaveToAlbum := False;
Params.RequiredResolution := TSize.Create(640,640);
Params.OnDidFinishTaking := TakePhotoDidFinishTaking;
Params.OnDidCancelTaking := DoCancelTaking;
FCameraService.TakePhoto(button1, Params);
end else
begin

end;


Подробнее здесь: https://stackoverflow.com/questions/793 ... on-android
Ответить

Быстрый ответ

Изменение регистра текста: 
Смайлики
:) :( :oops: :roll: :wink: :muza: :clever: :sorry: :angel: :read: *x)
Ещё смайлики…
   
К этому ответу прикреплено по крайней мере одно вложение.

Если вы не хотите добавлять вложения, оставьте поля пустыми.

Максимально разрешённый размер вложения: 15 МБ.

Вернуться в «Android»