Text zu einer Fehlermeldung auslesen.

[eddy]

Delphi-Quellcode:

var
  errcode : word;

begin

.....

  errcode := GetLastError;
  if errcode <> 0 then begin
    // Fehlercode auswerten 
  end;

.....
end;