[delphicoding]

PS Админам и модераторам - советую подкорректировать тег кода на форуме, чтобы в конце кода не добавлял лишние три пустые строки. Если сделано специально для отделения и одной строки хватит. Сейчас выглядит неаккуратно.