Цитата Сообщение от Nikolay_11 Посмотреть сообщение
Заработало, только при вводе числа DWord записывается через 4 строчки
Замените в 3 местах WORD на DWORD (Unsigned) и будет в каждой строчке.