まともなOOPLならRectangleクラスのメソッド探せば
すぐ目的のメソッドが見つかるのにな。
Delphiって使いにくいね。