[m1sclick]

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

Код:

  if PSoed = 'Разъеденено' then
      x := true;
    if PSoed = 'Параметры применены' then
      x := true;
    if PSoed = 'Разъеденено' then
      x := true;
    if PSoed = 'Ошибка имени устройства' then
      x := true;
    if PSoed = 'Ошибка соединения' then
      x := true;
    if PSoed= 'Соединение невозможно' then
      x:=true;
if x = true then Result:=1

Но проверяется этот X только один раз (сразу), а нужно ждать, пока x станет TRUE (PSoed меняется в неконтролируемой мной процедуре).

Ну так:

Код:

repeat
//-//-//-//-//-//
until x = true;