Выскакивает ошибка delphi 2009

[Corpuscul]

Всем доброго времени суток, столкнулся с проблемой при заполнении массива - выдает такую ошибку :
First chance exception at $75EED36F. Exception class EConvertError with message ''0,01 ' is not a valid floating point value'. Process Project1.exe (4468)
Что неправильно ?
В текстовых файлах содержится функция Бесселя от аргумента u, который там записан от 0,01 до 6,01

procedure TForm1.btn1Click(Sender: TObject);
 var words: TStringList; a, b, c, p: Double; i,j: Integer; f: TextFile; buf:  string;
 mb: array[1..2,1..121] of Double;
begin
    words:= TStringList.Create;
  SplitTextIntoWords(edt1.Text,words);
  a:= StrToFloat(words.Strings [0]);
  b:= StrToFloat(words.Strings [1]);
  c:= StrToFloat(words.Strings [2]);
  words.Free;
  tolshina(a);
  mmo1.Clear;
  AssignFile(f, 'd:/u.txt');
Reset(f);
i:=1;
j:=1;
  while not EOF(f) do
  begin
    readln(f, buf); // прочитать строку из файла
    p:= StrToFloat(buf);
    mb [i,j]:= p;
    inc (j);
  end;
    CloseFile(f); // закрыть файл
  AssignFile(f, 'd:/Ko.txt');
Reset(f);
i:=2;
j:=1;
  while not EOF(f) do
  begin
    readln(f, buf); // прочитать строку из файла
    p:= StrToFloat(buf);
    mb [i,j]:= p;
    inc (j);
  end;
    CloseFile(f); // закрыть файл

[Mad_Cat]

от 0,01 до 6,01

а должен быть от 0.01 до 6.01

[Corpuscul]

а должен быть от 0.01 до 6.01

Пробовал менять на точку разделитель все равно ругается
First chance exception at $751DD36F. Exception class EConvertError with message ''0.01 ' is not a valid floating point value'. Process Project1.exe (3312)

[Stilet]

Во-первых: Поставь принудительно переменную DecimalSeparator в точку
Во-вторых: Почему не пройдешся отладчиком пошагово и не выяснишь на какой строке и при каких условиях (что содержат переменные в этой строке) возникает ошибка?

[Corpuscul]

Почему не пройдешся отладчиком пошагово и не выяснишь на какой строке и при каких условиях (что содержат переменные в этой строке) возникает ошибка?

Недавно начал программировать, в универе только паскаль был, но отладчика там не было, в общем не знаю как его вызвать даже.

Поставь принудительно переменную DecimalSeparator в точку

А можно пример, как это сделать?

[Stilet]

procedure TForm1.btn1Click(Sender: TObject);
 var words: TStringList; a, b, c, p: Double; i,j: Integer; f: TextFile; buf:  string;
 mb: array[1..2,1..121] of Double;
begin

  FormatSettings.DecimalSeparator:='.';

  words:= TStringList.Create;
  SplitTextIntoWords(edt1.Text,words);
  a:= StrToFloat(StringReplace(words[0],',','.',[]));
  b:= StrToFloat(StringReplace(words[1],',','.',[]));
  c:= StrToFloat(StringReplace(words[2],',','.',[]));

Вот что я имел ввиду.
Теперь хоть точка хоть запятая программа должна правильно понять число

[Corpuscul]

Ой, моя ошибка лишнее выложил переменные a,b,c считываются из поля edit1 и с этим проблем нет, все читается и считается.
А вот в файле u.txt и Ko.txt у меня функция Бесселя скопированная из Exel и не читает именно оттуда, хоть в самом файле я и точки на запятые менял и обратно. Могу файлы приложить, если надо.


Вроде разобрался, там в файле пробел затесался после числа