[lmikle]

Угумс. Просто ты пишешь данные как строки, но не пишешь длинну.
А длинна кажлого числа тебе потом потребуется для чтения. Вот ты и получаешь ошибки.

Вообще-то, у тебя не самый эффективный способ работы с потоками. Все преимущество потоков ты теряешь. А именно, что в поток пишется только полезные данные.

Если ты хочешь "видеть" в файле свои цифирьки, то не используй поток.
Ну, или если очень приспичило, то набирай данные в TStringList в виде строк, а потом его пиши в поток. Хотя опять-же - не самое эффективное использование потока.