如何从相机获得多个位图

Question

我想在Delphi 10.4中使用Firemonkey扫描QRCode。

我可以用下面的代码拍摄一张照片，但我只得到一个OnDidFinishTaking事件，并且解析最终图像以读取QRCode不是很好:

if TPlatformServices.Current.SupportsPlatformService(IFMXCameraService, Service) then
begin
Params.Editable := False;
Params.NeedSaveToAlbum := True;
Params.RequiredResolution := TSize.Create(640, 640);
Params.OnDidFinishTaking := DoDidFinish;
Params.OnDidCancelTaking := DoDidCancel;
Service.TakePhoto(imgIndice, Params);
end
else
ShowMessage('This device does not support the camera service');

因此，我使用TCameraComponent代替OnSampleBufferReady事件。

这正是我想要的，但是这个组件真的很糟糕，它需要很长时间才能打开，而且图像不稳定。

是否存在其他方法从相机获得流体系列图像?像普通的qr码扫描器一样?

也许直接从Android或iOS api ?

Answer 1

这个相机组件问题已经存在很长时间了。

在android端，为了摆脱这些问题，你应该将Java代码移植到Delphi。

我建议你在这里下载试用版，就像你在Delphi演示(OnSampleBufferReady)中所做的那样，从他们的组件中获取相机图像。

Mobile Live Camera Publish SDK For Delphi 3.0http://www.flashavconverter.com/content/mobile-live-camera-publish-for-delphi

所以你没有性能问题，你不会在这里使用RTMP功能，你只会从相机获得图像，它会解决你的问题，所以即使是一个试验也会做它的工作。

所以我们想办法解决这个相机问题，它起作用了，Flash公司定期修复其组件的错误，并发布新delphi的新版本。

您可以联系flashconverter的服务电子邮件寻求帮助。

在delphi自己的组件;在delphi中转换原始相机像素的性能很差，

(例如，当分辨率增加时，delphi中的FPS下降，延迟开始)

你可以访问在quality.embarcadero.com霓虹灯优化代码，但我不知道它是如何工作在delphi 11现在