Local toimage2:TImage=LoadImage(toimage)
Local fromimage2:TImage=LoadImage(fromimage)
GCMemalloced() wasn't showing any leak so it must have been something unGCed. As your code didn't specify an object type it was int (not covered by GC) so was taking the space each time and never being released.