позволяет получить код последней ошибки Windows API
|| function GetLastError : Integer;
Описание:
Delphi функция GetLastError возвращает
последнюю ошибку связанную с вызовом Windows API.
Это полезно для многих программ SysUtils, см
пример.
Пример кода:
begin
if DeleteFile('CanDeletMe.txt')
then ShowMessage('File deleted OK')
else
ShowMessage('File not deleted, error code = '+
IntToStr(GetLastError));
end;