Цитата Сообщение от vooodooo22 Посмотреть сообщение
Выдает ошибку :
Объявите
i : byte;
как
i : Word;
Должно помочь :-)