Можно ли как-то менять 9-ый бит передаваемых данных без изменения остальных параметров порта?

24.05.2006, 04:09. **Просмотров** 1597. **Ответов** 1

Здравствуйте, уважаемые коллеги!

У меня следующий вопрос: есть устройство, которое связано с ПК по RS232. 9-ый бит передаваемых данных используется для детектирования адреса, т.е. программе на ПК нужно постоянно менять настройки СОМ-порта, касающиеся 9-го бита, с mark на space. Это очень сильно замедляет работу, т.к. заодно устанавливаются прочие настройки( компонент MSComm control, метод Settings). Можно ли как-то менять 9-ый бит передаваемых данных без изменения остальных параметров порта? Может быть лучше использовать какой-нибудь сторонний компонент, или API?

26.05.2006, 01:22

Перевёл проект на API. Всё работает, но при вызове функции ReadFile VB вылетает с ошибкой. Нет ли у кого работающего примера использования функций WriteFile и ReadFile для работы с COM портом? Буду очень благодарен.

P.S. вот на всякий случай код функции

Visual Basic

Public Sub C8_Write(S As String)
 
  Dim Bytes() As Byte
  Dim BytesOk As Long
  Dim CS As COMSTAT
  Dim Errors As Long
  Dim Overlap As OVERLAPPED
  Dim Buffer As String
  Dim Temp As Long
  Dim T As Long
  Do
    ClearCommError cHandle, Errors, CS
    Temp = CS.cbOutQue
  Loop Until Temp = 0
 
  WriteFile cHandle, S, Len(S), BytesOk, Overlap
  T = Timer
  Do
    ClearCommError cHandle, Errors, CS
    Temp = CS.cbInQue
    If Timer - TimeOut > T Then MsgBox "Timeout": Exit Sub
  Loop While Temp = 0
 
  Buffer = String(255, vbNullChar)
  ReadFile cHandle, Buffer, Temp, BytesOk, Overlap
End Sub

(запись в порт некоторых данных и, сразу же, чтение).

Insolent
		1
	Можно ли как-то менять 9-ый бит передаваемых данных без изменения остальных параметров порта? 24.05.2006, 04:09. Просмотров 1597. Ответов 1 Метки нет (Все метки) Здравствуйте, уважаемые коллеги! У меня следующий вопрос: есть устройство, которое связано с ПК по RS232. 9-ый бит передаваемых данных используется для детектирования адреса, т.е. программе на ПК нужно постоянно менять настройки СОМ-порта, касающиеся 9-го бита, с mark на space. Это очень сильно замедляет работу, т.к. заодно устанавливаются прочие настройки( компонент MSComm control, метод Settings). Можно ли как-то менять 9-ый бит передаваемых данных без изменения остальных параметров порта? Может быть лучше использовать какой-нибудь сторонний компонент, или API?

Опции темы