Delphi-Quellcode:
Height := i.Height;
Width := i.Width;
Das Ganze in einem Codeabschnitt, der immer dann ausgeführt wird, wenn die Parameter von i geändert werden. Also entweder in den Setter-Methoden der entsprechenden Propertys oder evtl. im OnPaint. (Wobei OnPaint wahrscheinlich viel zu oft, und zur falschen Zeit ausgeführt wird...)
Es gibt nur sehr wenige Probleme auf dieser Welt, die sich nicht mit einigen hundert Gramm Sprengstoff lösen ließen.