CameraComponent Quality

时间:2023-03-09 07:47:55
CameraComponent Quality

CameraComponent1.Quality := TVideoCaptureQuality.HighQuality;

procedure TCameraComponentForm.Set720p;
var
lset: TArray<TVideoCaptureSetting>;
begin
CameraComponent1.Quality := TVideoCaptureQuality.CaptureSettings;
CameraComponent1.CaptureSettingPriority := TVideoCaptureSettingPriority.FrameRate;
lset := CameraComponent1.AvailableCaptureSettings;
CameraComponent1.CaptureSetting := lset[];
end;