Com-порт - при установке структуры DBC нерегулярно выдает сообщение "failed with error 87"

bool PSOpen()
{
    AnsiString portname;        
    DCB dcb;                    
    COMMTIMEOUTS timeouts;      
    portname = "COM6";          
 
    Powerport = CreateFileA(portname.c_str(),GENERIC_READ | GENERIC_WRITE, 0,
              NULL, OPEN_EXISTING, FILE_FLAG_OVERLAPPED, NULL);
 
    if (Powerport == INVALID_HANDLE_VALUE)                  
    {
        return false;
    }
                                    
    dcb.DCBlength = sizeof(DCB);    
                                    
    if (!GetCommState(Powerport, &dcb))
    {
        PSClose();                  
        return false;
    }
    dcb.BaudRate        = CBR_57600;                
    dcb.fBinary         = FALSE;                     
    dcb.fOutxCtsFlow    = FALSE;                      
    dcb.fOutxDsrFlow    = FALSE;                      
    dcb.fDtrControl     = DTR_CONTROL_DISABLE;       
    dcb.fDsrSensitivity = FALSE;                     
    dcb.fNull           = FALSE;                      
    dcb.fRtsControl     = RTS_CONTROL_DISABLE;        
    dcb.fAbortOnError   = FALSE;                      
    dcb.ByteSize        = 8;                         
    dcb.Parity          = NOPARITY;                
    dcb.StopBits        = ONESTOPBIT;                 
 
    dcb.fParity         = false;
    dcb.fTXContinueOnXoff = true;
    dcb.fOutX           = false;
    dcb.fInX            = false;
    dcb.fParity         = false;    
 
    if (!SetCommState(Powerport, &dcb))
    {
            LPTSTR lpszFunction;
            LPVOID lpMsgBuf;
            LPVOID lpDisplayBuf;
 
            DWORD dw = GetLastError();
 
            FormatMessage(
                FORMAT_MESSAGE_ALLOCATE_BUFFER |
                FORMAT_MESSAGE_FROM_SYSTEM,
                NULL,
                dw,
                MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
                (LPTSTR) &lpMsgBuf,
                0, NULL );
 
            lpDisplayBuf = (LPVOID)LocalAlloc(LMEM_ZEROINIT,
                (lstrlen((LPCTSTR)lpMsgBuf)+lstrlen((LPCTSTR)lpszFunction)+40)*sizeof(TCHAR));
            wsprintf((LPTSTR)lpDisplayBuf,
                TEXT("%s failed with error %d: %s"),
                lpszFunction, dw, lpMsgBuf);
            MessageBox(NULL, (LPCTSTR)lpDisplayBuf, TEXT("Error"), MB_OK);
 
            LocalFree(lpMsgBuf);
            LocalFree(lpDisplayBuf);
            ExitProcess(dw);
 
        PSClose();
        return false;
    }