RunError

Z Delphi & Pascal (česká wiki)

Skočit na navigaci Skočit na vyhledávání

Zastaví vykonávání programu.

Deklarace

procedure RunError [ ( Errorcode: Byte ) ];

Režim: Windows, Reálný, Chráněný

Poznámky: Vygeneruje běhovou (run-time) chybu daného čísla na aktuálním příkazu.

Viz také: Exit

Hlášení běhových chyb

Vzorový příklad

{Runerror.PAS}
{Vzorový příklad pro proceduru RunError.}
begin
{$IFDEF Debug}
  if P = nil then
    RunError(204);
{$ENDIF}
end.

Citováno z „https://trsek.com/pascal/index.php?title=RunError&oldid=1255“