Initializes image (all is set to zeroes).

procedure InitImage(var Image: TImageData);

Imaging (at line 57)

Call this for each image before using it (before calling every other function) to be sure there are no random-filled bytes (which would cause errors later).