Im Anhang ist ein Formular mit
Unit, beides in dein Projekt-Ordner kopieren und "uCapture" in den "Uses" aufnehmen.
Dann sowas in der Art...
Delphi-Quellcode:
procedure Foobar;
var
Capture: TfrmCapture;
begin
Capture := TfrmCapture.Create(nil);
try
Capture.ShowModal;
Image1.Picture.Bitmap.Assign(Capture.Image);
finally
Capture.Free;
end;
Da ist leider ein Flickern drinn was ich nicht abschalten kann da ich irgendwo was falsch mache
