Gut, wenn ich das mit Cursor probiere komme ich dann auf ~272 fps.
Das liegt wahrscheinlich daran, das ich den Cursor mit SetPixelV zeichne
An dem Makro ist nix besonderes dran, ich habe mir das irgendwann mal mit einigen Parametern gemacht
Aber im Kern ist es nix anderes als ein simples BitBlt vom Desktop
DC.
Delphi-Quellcode:
Wnd:=GetDesktopWindow;
DC:=GetWindowDC(GetDesktopWindow);
If DC=0
then Exit;
// Failed
BitBlt(Bitmap.Canvas.Handle, 0, 0, Bitmap.Width, Bitmap.Height,
DC, 0, 0, SRCCOPY);
ReleaseDC(Wnd,
DC);
Das Problem ist nicht, wie bekommst Du die Bilder, sondern, wie kannst Du schnell die anfallende Datenrate verringern, um es auf die Platte zu bringen.
Grüßle!