If you're just trying to save the *image*, it's really easy:
Or for lossless images, use SavePixmapPNG instead.
mypic:TPixmap=GrabPixmap(0,0,640,480) SavePixmapJPeg(mypic:TPixmap,"myfile.jpg",quality=75")
Or for lossless images, use SavePixmapPNG instead.