Your face, your ass, what's the difference? (с)
Так... это что? На йух. Эту строчку тоже на йух. Условие сюда, нах его из цикла. Вызов процедуры... долго, все в одну процедуру. каммент этот тоже нах... ТАк.. это что за нафиг? Ну млин... на йух, по определению... Запускаем! ))

@настроение: Delphi изнасиловало мой мозг!