wenn du auf das picture von image1 zugreifen willst, musste dem das auch sagen
Image1.Height:= Image1.Picture1.Height * Image1.Height / Image1.Picture1.Width;
[edit] wobei das so direkt auch nicht funktionieren wird... da du dividierst musst du auch das ganze runden!