repeat 中的 continue

  repeat
    a := -;
    if A >  then
      ShowMessage('')
    else
    begin
      Caption := '';
      Continue;//不是立即 向上 返回 执行，要先向下 检查循环条件 是否还 满足？
    end;
  until A < ;