RunError

Stops program execution.

Declaration

procedure RunError [ ( Errorcode: Byte ) ];

Target

Windows, Real, Protected

Remarks

Generates a run-time error with the given number at the current statement.

See Also

Exit

Halt

Run-time error messages

Sample Code

{Runerror.PAS}
{Sample code for the RunError procedure.}

begin
{$IFDEF Debug}
 if P = nil then
   RunError(204);
{$ENDIF}
end.