Sei mir nicht böse, aber schau dir mal ein Anfängertutorial an.
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
var
Bmp: TBitmap;
Jpg: TJpegImage;
begin
//Screenshot etc ...
//dann hast du den in der Variblen "bmp"
try
Jpg.Assign(Bmp); //Dem Jpg das Bmp zuweisen
Jpg.SaveToFile(ChangeFileExt(Filename, '.jpg' )); //Jpg speichern
finally
Jpg.Free; //Speicher jeweils freigeben
Bmp.Free;
end;
end;