Nun, wenn ich das in den Timer schreibe, macht er jede Sekunde eine Datei, die aber 0 Byte ist, und keinen Screenshot beinhaltet (selbst wenn ich Druck gedrückt habe).
Daraus schließen sich 2 Probleme: 1. Ich will auch einen Screenshot in der Datei (logisch
) und 2. Ich möchte mit dem Timer ja "überprüfen" ob ein Bild im Clipboard ist, und wenn nicht, einfach nichts tun.
Mein Code sieht jetzt so aus:
Delphi-Quellcode:
try
Bitmap := TBitmap.Create;
JPEGImage := TJPEGImage.Create;
if not Clipboard.HasFormat(CF_BITMAP) then
exit
else
Bitmap.Assign(ClipBoard);
//JPEGImage.Assign(Bitmap);
//JPEGImage.SaveToFile(FormatDateTime('yyyymmddhhnnss',Now)+'.jpg');
Bitmap.SaveToFile(FormatDateTime('yyyymmddhhnnss',Now)+'.bmp');
finally
Bitmap.Free;
JPEGImage.Free;
end;