delphi android firemonkey摄像头启动

Question

我想从我的应用程序中启动手机本机摄像头应用程序。所以我不必重新创建一个图片拍摄应用程序。我该怎么做。

使用10.21

感谢 罗伯特

Answer 1

在Android上，叫adb（与Android SDK绑定）的工具是计算机和设备之间的桥梁。您可以从终端运行命令，以便与Android OS的许多功能进行交互。

使用Delphi，您的应用程序可以直接在cmd中运行命令。

为了拍照，你可以按照教程here。

然后只需从设备中提取生成的文件，例如adb pull /path/to/filename.jpg %USERPROFILE%\Desktop\。

Answer 2

从Delphi应用程序中，您可以使用TActionList，它是标准操作TakePhotoFromCameraAction。

要使用它从一个按钮，添加一个TActionList到您的窗体，按钮设置Action属性TakePhotoFromCameraAction。

由于只有代码：

• 附加单元FMX.MediaLibrary.Actions
• 创造型TTakePhotoFromCameraAction的varaible TakePhotoFromCameraAction1

• 设置它的TakePhotoFromCameraAction1.DidFinishTaking事件，像这样的方法：

  procedure TForm1.TakePhotoFromCameraAction1DidFinishTaking（Image：TBitmap）; begin // ... end;需要