[Uniq!]

Код:

if Image1.AutoSize=false then
 begin
  image1.Align:=alCustom;
  Image1.AutoSize:=True;
  image2.Visible:=False;
  image3.Visible:=False;
  image4.Visible:=False
 end
else
 обрабатываешь то что должно происходить если картинка должна перейти от большого к маленькому типу:
begin
  Image1.AutoSize:=false;
  image2.Visible:=true;
  image3.Visible:=true;
  image4.Visible:=true;
end;
end;