Не работает StrToDouble

Подскажите пожалуйста в чем ошибка? Облазил форум, доки уже несколько дней не могу решить этот вопрос.

Есть функция, которая рисует линию:

void PutHLine(string name,double price)
  {
   ObjectsDeleteAll(0,OBJ_HLINE);
   ObjectCreate(0,name,OBJ_HLINE,0,0,price);
   ObjectSetInteger(0,name,OBJPROP_COLOR,Red);
   ObjectSetInteger(0,name,OBJPROP_STYLE,STYLE_SOLID);
   ObjectSetInteger(0,name,OBJPROP_WIDTH,2);
  }

 Функция, читающая строку с ценой из файла:

   string pr;

   int h=FileOpen("Files\\log.txt",FILE_READ|FILE_TXT);

   if(h!=-1)
     {
      pr=FileReadString(h,7);
      //--- закроем файл
      FileClose(h);
     }

 Линию рисую таким образом:

  PutHLine("Price "+pr,NormalizeDouble(StrToDouble(pr),Digits));

В результате линия рисуется на уровне 1.0000.

Цена считывается правильно, в имени линии выводит: Price 1.13073. 

В Comment выводится также правильное значение. StringToDouble дает тот же результат. Без нормализации все тоже.

Таким образом выводит линию правильно: 

PutHLine("Price " + pr, 1.13073);

Не пойму в чем дело, где искать ошибку?