[SpectraL]

Подтвердите пожалуйста, что в Delphi XE7, если после оператора "repeat ... until true" нажать Enter, то снова добавляется текст "until ;":

Код:

// Пример
procedure TForm1.Button1Click(Sender: TObject);
  var
    i: byte;
begin
  repeat
    synchronize(procedure begin i := 'test'; end)
  until true;
  until ;
  until ;
  until ;
end;

MAD: используем теги по назначению