Einzelnen Beitrag anzeigen

Rollo62

Registriert seit: 15. Mär 2007
2.781 Beiträge
 
Delphi 10.3 Rio
 
#1

Fmx Mobile IFMXCameraService TakePhoto

  Alt 30. Okt 2015, 11:19
Hallo zusammen,

weiss jemand wofür hier der Parameter Control gut ist ?

Code:
procedure TForm1.SpeedButton1Click(Sender: TObject);
var
  Service: IFMXCameraService;
  Params: TParamsPhotoQuery;
begin
  if TPlatformServices.Current.SupportsPlatformService(IFMXCameraService,
    Service) then
  begin
    Params.Editable := True;
    // Specifies whether to save a picture to device Photo Library
    Params.NeedSaveToAlbum := True;
    Params.RequiredResolution := TSize.Create(640, 640);
    Params.OnDidFinishTaking := DoDidFinish;
    Service.TakePhoto([B]SpeedButton1[/B], Params); [B]//Was hat der Button damit zu tun ?[/B]
  end
  else
    ShowMessage('This device does not support the camera service');
end;
Zitat:
Service.TakePhoto(SpeedButton1, Params); //Was hat der Button damit zu tun ?
Natürlich löst der Button das aus, aber das Aufnehmen setzt doch nicht etwa rückwirkend irgendetwas im Button ?

Rollo
  Mit Zitat antworten Zitat