RunError: Porovnání verzí

Z Delphi & Pascal (česká wiki)
Skočit na navigaci Skočit na vyhledávání
m (1 revízia: Unit System)
 
Řádek 31: Řádek 31:
 
[[Category:System]]
 
[[Category:System]]
 
[[Category:Procedúry System]]
 
[[Category:Procedúry System]]
 +
[[Category:Procedury pro řízení programu]]

Aktuální verze z 5. 10. 2012, 20:49

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
Halt
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.