Exit Sub 手続き終了
Exit Sub や Exit Function はその手続き、関数から抜け出す時に使用します。 Delphiでは2つともまとめて Exit を使用します。
procedure TForm1.TestProc; begin if Width < 100 then begin exit; end; //あんまり意味のないサンプルですが、、 end;