Acces violation в условии цикла repeat

← →
EsKor (2002-03-04 10:42) [0]

Может ли кто-нибудь подсказать почему при реализации кода указанного ниже возникает сообщение:
Access violation at address 0049D053 in module "EXPERTACT.EXE". Read of address FFFFFFFF.

procedure ...
var
Response : String;
...
repeat
Response := Receiving(hCOMPort); //Принять ответ
if Response <> "" then
if Response[1] = "S" then //Если в ответе 1-й символ S, то
begin //связь с весами установлена
TimerWaitResponse.Enabled := false; //остан.таймер ожид.соедин
imgConnect.Visible := true; //отобразить соединение
Sending(hCOMport, "D HELLO"); //вывести на дисплей "HELLO"
TimerAfterHello.Interval := 1500; //установить время таймера
TimerAfterHello.Enabled := true; //запуст.таймер сброса весов
end;
Application.ProcessMessages;
until EndOfWaitResponse or (Response[1] = "S");
...
end; {procedure}
EndOfWaitResponse глобальная переменная типа boolean.

Такое сообщение стало появляться после добавления в условие прекращение цикла or (Response[1] = "S"). Причем код из цикла можно вообще убрать (сделать пустой цикл), но ошибка не устраняется. Можно, конечно, обойтись без этой второй части условия, но, сами понимаете, и при такой реализации ошибки быть не должно.

Acces violation в условии цикла repeat - until Найти похожие ветки