Помогите найти ошибку - StrToFloat выдаёт ошибку EConvertError для ячеек StringGrid (Delphi)

[Artsiom]

Доброго времени суток.
Объясните, почему ругается на "Проект Project1.exe возникло исключение класса EConvertError с сообщением " " не является допустимым с плавающей запятой"

StringGrid2.ColCount := StrToInt(Edit1.Text);

 for j := 0 to StringGrid1.RowCount do //строки
 begin
  min := StrToFloat(StringGrid1.Cells[0, j]);

  for I := 1 to StringGrid1.ColCount do //столбцы
   if StrToFloat(StringGrid1.Cells[i, j]) < min then
    min := StrToFloat(StringGrid1.Cells[i, j]);

   StringGrid2.Cells[j, 0] := FloatToStr(min);
   StringGrid2.Cells[j, 1] := IntToStr(j);
 end;

[Artsiom]

Все ячейки заполнены цифрами. Типа как в SQL, null ни где не присутствует.

[Serge_Bliznykov]

Все ячейки заполнены цифрами. Типа как в SQL, null ни где не присутствует.

во-первых, при чём здесь null ?!
ваш код натыкается на ПУСТУЮ ячейку (т.е. ячейку, в которой находится ПУСТАЯ строка)

во-вторых,

Все ячейки заполнены цифрами.

- не верю! (с) Станиславский! (для примера, 50-я ячейка в 100-м столбце точно содержит число?!

для начала циклы крутите правильно:

 for j := 0 to StringGrid1.RowCount-1 do //строки
 begin
  min := StrToFloat(StringGrid1.Cells[0, j]);

  for I := 1 to StringGrid1.ColCount-1 do //столбцы

[Artsiom]

Сообщение от Serge_Bliznykov

во-вторых, - не верю! (с) Станиславский! (для примера, 50-я ячейка в 100-м столбце точно содержит число?!
[/CODE]

Эм, я не задавал массива больше чем 4х4. От куда там может взяться 100 столбец?

[Serge_Bliznykov]

Сообщение от Artsiom

Эм, я не задавал массива больше чем 4х4. От куда там может взяться 100 столбец?

Вам хочется это обсудить этот вопрос?

ОК.
Это ответ на ваше замечание:

Все ячейки заполнены цифрами.

я и пытаюсь донести до Вас, что у Вас НЕ ВСЕ ячейки заполнены цифрами (точнее числами).

Для понимания сего факта напишите у себя примерно такой код:

var s : string;
begin
  s := StringGrid1.Cells[99, 49];

А теперь вопрос Вам - что сделает данный код и чему будет равная строковая переменная s после выполнения данного кода?!

p.s. это всё лирика! Вы видели, где Вы ошибку в коде допустили (я выделил исправления)? Всё работает?!

[Stilet]

Вот как надо в таких спорных случаях:

 
var k:integer;
...
for j := 0 to StringGrid1.RowCount do //строки
 begin
  min := StrToFloat(StringGrid1.Cells[0, j]);

  for I := 1 to StringGrid1.ColCount do //столбцы
   if TryStrToFloat(StringGrid1.Cells[i, j],k)  then begin
    if k<min then min:=k;
  end else ShowMessage('В ячейке '+StringGrid1.Cells[i, j]+' не целое');

   StringGrid2.Cells[j, 0] := FloatToStr(min);
   StringGrid2.Cells[j, 1] := IntToStr(j);
 end;

Тогда будет ясно где ошибся.

[Serge_Bliznykov]

Сообщение от Stilet

Вот как надо в таких спорных случаях:

 
for j := 0 to StringGrid1.RowCount do //строки
....
  for I := 1 to StringGrid1.ColCount do //столбцы
....
   .... ShowMessage('В ячейке '+StringGrid1.Cells[i, j]+' не целое');

Тогда будет ясно где ошибся.

во-первых, почему "не целое" ? Не вещественное.

во-вторых, ничего не будет ясно.

Выдаст код "В ячейке не целое ", и что это даст?!
То, что там пустая строка, и к Ванге не ходи, я и так это скажу!

Но даже если добавить в это сообщение выдачу I и J это всё равно вряд ли сразу поможет TC.
Ибо нумерация строк/столбцов идёт от нуля.
Допустим, RowCount = 4 (четыре строки) выдаёт, что в ячейке
с номером столбца 1 и строкой 4 не число. И что? На самом деле, строки заполнены только нулевая, первая, вторая и третья. Но TC то считает, что у него с 1-й по 4-ю заполнены!!

p.s. я выше выложил исправленный код. Зачем проверять ЗАВЕДОМО ОШИБОЧНЫЙ код?!

[Stilet]

Выдаст код "В ячейке не целое ", и что это даст?!

Это даст возможность выяснить в какой ячейке нечисло.
Я проверяюсь именно так если проявляется необходимость.

[Serge_Bliznykov]

Сообщение от Stilet

Это даст возможность выяснить в какой ячейке нечисло.

каким образом это даст выяснить в КАКОЙ ячейке не число ?!
Может быть, Вы это смотрите в отладчике.
Или в тексте сообщения выводите индексы ячейки.
Но в данном примере кода индексы у Вас не выводятся.
Кроме самого сообщения, никакой другой информации не будет отображено!

[Stilet]

Но в данном примере кода индексы у Вас не выводятся.

Потому что это всего лишь подсказка )
Ничего не мешает там автору написать вывод координат. Мне просто было лень так расписывать. Основной намек - проверка на число путем попытки перевода и обработка ошибки перевода. А как автор этим распорядится не мое дело.