Image Größe verändern

[sloper]

Hallo! Ich habe ein Image in meinem Formular und möchte dass es seine Größe ändert wenn man das Fromular vergrößert oder verkleinert... ich hab das so gelöst:

if Form1.width <= Form1.height then
begin
Image1.width := Form1.width div 2;
Image1.height := Form1.width div 2;
end
else
begin
Image1.width := Form1.height div 2;
Image1.height := Form1.height div 2;
end;

Image1.top := Form1.height div 2 - Image1.height div 2;
Image1.left := Form1.width div 2 - Image1.width div 2;

Der 2. Teil soll dafür sorgen dass das Image immer in der Mitte bleibt - das tut es auch... die Größe ändert es aber nicht! Habe ich einen Fehler gemacht? Oder woran kann es sonst liegen?

Aja... ein Timer sorgt dafür dass es wiederholt wird...


Danke für die Hilfe!