COM-порт.Немогу записать в порт.

← →
TRyaSS (2004-07-20 14:00) [0]

Всем здрасти.Проблемма вот в чем:с COM портом соединена железяка,нужно с ней общаться, записываю в порт ф-ей Writefile,а она все время False возвращает.вот код иниц-ции порта
procedure PortInit; begin //создание и иницализация порта KolByte:=0; //создание порта и получение его хэндла CommHandle := CreateFile("COM2",GENERIC_READ or GENERIC_WRITE,0,nil,OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL or FILE_FLAG_OVERLAPPED,0); //ставим маску - "по пришествии определенного символа" SetCommMask(CommHandle,EV_RXFLAG); //построение DCB GetCommState(CommHandle,DCB);//чтение DCB DCB.BaudRate:=strtoint(form1.commspeed.text);//скорость работы порта DCB.Parity:=NOPARITY; //проверка на четность DCB.ByteSize:=8; //количество посылаемых бит в 1-й посылке DCB.StopBits:=oneStopBit; //количество стоп-бит DCB.EvtChar:=chr($01);//задание символа для флага(события) //устанавливаем DCB SetCommState(CommHandle,DCB);//запись DCB end;
запись в порт
procedure WriteComm(transmit:string;K:dword); var err:longbool; s:pchar; Transmits:array [0..255] of char; begin //послать один символ в порт KolByte:= k; //количество посылаемых символов Transmits[1]:=chr(49); //посылка s:=pchar(Transmit); err:=WriteFile(CommHandle,transmit,KolByte,KolByte,@Ovr);//запись в порт if err then form1.edit4.Text:=floattostr(kolbyte); end;

← →
Reindeer Moss Eater © (2004-07-20 14:06) [1]

записываю в порт ф-ей Writefile,а она все время False возвращает.

Так и должно быть при асинхронных операциях.

← →
TRyaSS (2004-07-20 14:21) [2]

но и фактически записанное количество байт тоже нулю равно...
и считывается с порта тоже ровно 0 байт.

← →
Reindeer Moss Eater © (2004-07-20 14:29) [3]

If hFile was opened with FILE_FLAG_OVERLAPPED and lpOverlapped is not NULL, the write operation starts at the offset specified in the OVERLAPPED structure and WriteFile may return before the write operation has been completed. In this case, WriteFile returns FALSE and the GetLastError function returns ERROR_IO_PENDING. This allows the calling process to continue processing while the write operation is being completed. The event specified in the OVERLAPPED structure is set to the signaled state upon completion of the write operation.

← →
Reindeer Moss Eater © (2004-07-20 14:32) [4]

но и фактически записанное количество байт тоже нулю равно...
и считывается с порта тоже ровно 0 байт.

Это :
1. Обман зрения
2. Так и должно быть при OVERLAPPED

Отрой примеры в MSDN Library или PlatformSDK.
Иначе ничего у тебя не выйдет.

← →
TRyaSS (2004-07-20 14:37) [5]

спасибо хоть за это!!!

← →
Reindeer Moss Eater © (2004-07-20 14:39) [6]

Описание
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/fileio/base/writefile.asp

Примеры
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/fileio/base/reading_from_and_writing_to_files.asp

За что спасибо, это же из стандартной справки, мог сам посмотреть

← →
имя (2004-07-20 17:16) [8]

Удалено модератором

Дружок,
Твой вопрос про запись в порт вчера никто не обсуждал.
Обсуждали почему ты читаешь из порта пустую строку и почему возвращаемые параметры тебе по барабану.

Так что закрой ротик.

COM-порт.Немогу записать в порт. Найти похожие ветки