Суть проблемы:
Есть таблица StringGrid. В ней пользователь задает число строк и вводит числа real (должны быть не равными нулю). Создается динамический массив для введенных данных. Далее проверяется не равен ли нулю хоть один. Если равен нулю хоть одно значение то обнуление динам. массива (:=nil) и прерывание процедуры с помощью exit. Если пользователь несколько раз будет ошибаться то периодически (причем не всегда) начнет появляться ошибка "Invalid pointer operation" В чем проблема?

Не совсем понятно.
Если пользователь ошибся один раз из N возможных, то автоматом затирается весь массив? И потом, если пользователь ошибается во второй раз, то массив снова стирается?
Может, я не совсем въехал в суть метода, но, по-моему, во второй раз уже происходит попытка затирания пустой области памяти. Поэтому pointer может и обругать. Но не совсем уверен, что проблемма именно в этом.
Приведи код, если не сложно.

С уважением, Serggggg

Traum код в студию.

Вот упрощенно:

procedure TForm_Daten.Button1Click(Sender: TObject);
begin
//создаем массив (n- получено от пользователя)
SetLength(L,n);
//считываем данные
For i:=0 to n-1 do
try L:=StrToFloat(Tabl.Cells[1,i+1]);except L:=nil; exit;end;
[I]//проверяем на допустимость
For i:=0 to n-1 do
if L[i]<L_min then begin L:=nil; exit; end;
end;
Ну там еще вводятся другие данные (обычные) (прием и обработка анологично как для L)
Если несколько раз вводить не то что надо то почемуто возникает (причем периодически) выше указанная ошибка.

Ошибка в

Код

try L:=StrToFloat(Tabl.Cells[1,i+1]);except L:=nil; exit;end;

А точнее в L:=StrToFloat(Tabl.Cells[1,i+1]);
Присваивание наверное надо делать не всему массиву, а лишь текущему элементу:

Код

try L[i]:=StrToFloat(Tabl.Cells[1,i+1]);except L:=nil; exit;end;

Странно, но мне кажется что ошибка должна возникать не иногда, а всегда!
Либо, когда она не возникает, то во втором цикле ты работаешь не с введенными данными, а с лабудой.

Петрович
Я тоже был удивлен когда сначала возникала ошибка а при последующих двух нажатиях ее нет (а потом снова ...)

Переписал заново большой блок программы с тестированием после добавления каждой строки и вроде бы ничего не изменял, а ошибка исчезла (вроде бы). Единственное подозрение: в одном месте старой версии сравнивал k1>k2, где k1 - double, а k2 - const.