Код:
if (Image1.Top + Image1.Height >= Image2.Top) and
(Image1.Top <= Image2.Top + Image2.Height) and
(Image1.Left + Image1.Width >= Image2.Left) and
(Image1.Left <= Image2.Left + Image2.Width) then
// тут чо-нить делаем.
Писал по памяти, но должно работать.