[SUB]

Тема : Ввод и вывод данных в потоках (TMemoryStream).
Вопрос такой:
Считываем из потока:

Код:

var
   SMin,SMout: TMemoryStream;
   m,s:  Real;
….
Begin
  ….
    SMin:= TMemoryStream.Create;

    SMout:= TMemoryStream.Create;
    SMin.LoadFromFile(AnsiString('c:\on\PROBA\in.txt'));
    SMin.Read(m,sizeOf(Real));
  ….
   S:=m+1.00234;
   SMout.Write(m,sizeOf(Real));
   SMout.SaveToFile('c:\on\PROBA\out.txt');
…
End.

В результате в файле все что угодно только не результаты вычисления(
Тоже c данными в формате integer.
Что делаю не правильно и как это исправить?
И еще как из потока считать строку не по символам до #13, а целиком и сразу, если это возможно).