Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.05.2008, 06:28   #1
UROKSAN
 
Регистрация: 03.03.2008
Сообщений: 5
По умолчанию работа с ком портом

ребят подскажите если кто знает почему при считывании с ком порта иногда теряются 2 байта. я считываю информацию по кадрам в каждом кадре 64 байта так вот иногда при чем не важно в какой момент при считывании происходит потеря 2 байтов после чего кадр стает некоректным
Код:
function TDComPort.ReadB: Byte;
Var
 Data: Byte;
 Size, RSize: DWORD;
begin
 // Будет возвращён в случае ошибки
 Result:=0;
 Size:=1;
 If Not ReadFile(PoortID, Data, Size, RSize, nil) Then
  Begin
   MainForm.LogError('Ошибка: Вызов ReadFile не удался');
   Error:=True;
   Exit;
  End;
 If RSize <> 1 Then
  Begin
   MainForm.LogError('Ошибка: Не удалось прочитать байт');
   Error:=True;
   Exit;
  End;
 Error:=False;
 Result:=Data;
end;
UROKSAN вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Нестандартная работа с COM портом Alex_C Win Api 2 22.07.2008 02:34
Работа с usb портом Spice Общие вопросы .NET 6 16.07.2008 08:32
работа с COM портом ShAzat Общие вопросы Delphi 8 28.05.2008 20:08
Работа с LPT портом chingiz Паскаль, Turbo Pascal, PascalABC.NET 1 17.11.2007 21:21