Пишем флудер на Delphi XE3

Код небольшой, так что сюда я его скидывать не буду Если уж очень хочется, пишите в комментарии, выложу P.S. в конце громкость убавьте