Показать сообщение отдельно
  #2  
Старый 18.08.2012, 03:29
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Цитата:
Сообщение от gebs
Код:
...
  if X = 2 then
  begin
    repeat
      begin
        Sleep(1000);
      end;
    until X <> 2;
  end;
А как X изменится, если здесь крутится бесконечный цикл? Да и не исполняется эта часть кода никогда.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием