[Pyro]

способ без дельфи но с установкой http://www.imagemagick.org/Usage/crop/

а в общем можно отдельно найти примеров на циклы, opendialog, любая работа с изображениями: bitblt, copyrect; delphi сохранить в tga, или найти книгу