Sign in Join
FPDoc Onlineexperiment

Continue procedure

In unit System

Continue with next loop cycle.

Declaration

pascal
procedure Continue

Description

Continue jumps to the end of the current repetitive statement. The code between the Continue call and the end of the repetitive statement is skipped. The condition of the repetitive statement is then checked again.

This can be used with For, repeat and While statements.

Note that although Continue is a compiler intrinsic (i.e. is treated specially) it is defined as an identifier in the system unit, hence it can be redefined.

Errors

None.

See also

Example: ex86

pascal
Program Example86;

{ Program to demonstrate the Continue function. }

Var I : longint;

begin
  I:=0;
  While I<10 Do
    begin
    Inc(I);
    If I<5 Then
      Continue;
    Writeln (i);
    end;
  I:=0;
  Repeat
    Inc(I);
    If I<5 Then
      Continue;
    Writeln (i);
  Until I>=10;
  For I:=1 to 10 do
    begin
    If I<5 Then
      Continue;
    Writeln (i);
    end;
end.

Example: ex121

pascal
{ 
  Example 121: 
  Continue, break and exit are system procedures.
  They can be redefined
}

procedure continue;

begin
  Writeln('Continue');
end;

Procedure Exit;

begin
  Writeln('exit');
end;

Procedure Break;

begin
  Writeln('Break');
end;

begin
  Repeat 
    Continue;
    Break;
    exit;
  Until True;  
end.

An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.