Показать сообщение отдельно
  #8  
Старый 22.09.2015, 08:00
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

Цитата:
Сообщение от Mishko
В модуле Winapi.Windows объявлена

function GetExitCodeProcess(hProcess: THandle; var pExitCode: PDWORD): BOOL; stdcall;
ты нас обманул:
Код:
function GetExitCodeProcess(hProcess: THandle; var lpExitCode: DWORD): BOOL; stdcall;
{$EXTERNALSYM GetExitCodeProcess}
>>
Код:
var
  ExitCode: DWORD;
begin
  if not GetExitCodeProcess(GetCurrentProcess, ExitCode) then RaiseLastOSError;
end;
__________________
Пишу программы за еду.
__________________
Ответить с цитированием