Fmx: VideoCaptureDevice Framerate

[TiGü]

Ich weiß nicht, ob dich das weiter bringt:
Das Firemonkey VideoCaptureHD-Beispiel von XE8 läuft auf meinen normalen Windows 7 PC sehr flüssig.
Kamera ist eine Logitech HD Webcam C525 laut Geräte-Manager.
Ich teste es gleich mal in einer Windows 10 VM.

[TiGü]

Zitat von TiGü:

Ich teste es gleich mal in einer Windows 10 VM.

Auch hier läuft es sehr flüssig im VMWare Player.
Ggf. mal auf anderen Rechnern testen?
Vielleicht eine ungünstige Kombination aus Webcam, VM und MacBook?

[Michael II]

Hallo Rollo

ich habe den von dir geposteten Code laufen lassen unter Windows 10 / Seattle / FMX mit der im Notebook eingebauten WebCam - (Prozessor: i7-3632QM).

Bei mir läuft das Beispiel flüssig mit 30fps, was wohl genau dem Wert entspricht, den die Kamera auch liefert.

Für die Ermittlung der fps habe ich diesen (sehr einfachen) Counter verwendet:

Delphi-Quellcode:

var lcounter : integer = 0;
    counter : integer = 0;
    ltim : DWORD = 0;

function fps : integer;
var gtc : DWORD;
begin
  inc( counter );
  gtc := TThread.GetTickCount;
  if ltim div 1000 <> gtc div 1000 then
  begin
    ltim := gtc;
    lcounter := counter;
    counter := 0;
  end;

  Result := lcounter;
end;

 procedure TForm21.EvOnSampleBufferReady(Sender: TObject; const ATime: TMediaTime);
 begin
   FCapVideo.SampleBufferToBitmap( Image1.Bitmap, True);
   label1.Text := inttostr( fps );
 end;

[Rollo62]

Hallo zusammen,

dankesehr für die Antworten.
Das hilft mir schon weiter, dann liegt es irgendwie an meiner Konfiguration.

Aber nicht nur in der VM ist es lahm, auch auf dem eigentlichen Zielrechner, für ein Kiosksystem mit XP.

Naja, dann bleibe ich eben bei VCL bis ich das klären kann, da weiss ich wenigstens was ich habe.

Rollo

[Michael II]

Hallo Rollo

soeben habe ich das Programm noch auf ein "Uralt-XP Notebook" kopiert und lasse es nun mit einer via USB angeschlossenen Kamera laufen.

Ich erhalte ein ruckelfreies Bild mit 30fps.

Delphi Seattle
Notebook: Dell inspiron mit Intel T2400
Kamera: Logitech QuickCam Pro 4000

[ Was auffällt: Der Clientbereich von Form1, welcher nicht von Image1 abgedeckt wird, wird nicht korrekt angezeigt/refresht: Wenn man mit einem anderen Fenster über Form1 fährt, dann bleiben gewisse Dinge von diesem anderen Fenster auf Form1 kleben. Aber das lässt sich ja leicht lösen. ]

Gruss aus Wabern, CH
Michael