SmartPascal
ErrorAddr
Variable
Sets the error address when an application terminates System unit
  var ErrorAddr : Pointer;
Description
The ErrorAddr variable is set to the address of an error when an application termination condition is reached. The value is displayed in an error dialog.
 
Delphi itself also stores the address of a code error when a run time error is encountered.
Related commands
Addr Gives the address of a variable, function or procedure
ErrorAddr Sets the error address when an application terminates
Exit Exit abruptly from a function or procedure
 
Example code : Display an error address in a termination error dialog
var
  i : Integer;
begin
  // Set up an error address so that halt shows a termination dialog
  ErrorAddr := Addr(i);

  // Set the program exit code
  ExitCode := 8;
end;
Show full unit code
   When the program terminates, an error dialog is displayed:
  
   Runtime error    8 at 0069FC94