Wenn die Grafik skalliert dargestellt wird ohne das Seitenverhältnis zu verändern, musst du das Seitenverhältnis der Grafik mit dem Seitenverhältnis des Image vergleichen.
Delphi-Quellcode:
d1 := Image.Picture.Width/Image.Picture.Height;
d2 := Image.Width/Image.Heigh;
if d1 < d2 then
{ Rand ist links und rechts }
else if d1 > d2 then
{ Rand is oben und unten }
else
{ Kein Rand }