Не до конца исправленный код.
Посмотри на WinResult