Turbo Delphi + Win 7 Пытаюсь читать контроллер по com-порту. [Code] Com1:=CreateFile(PChar('COM4'), GENERIC_READ or GENERIC_WRITE, FILE_SHARE_READ or FILE_SHARE_WRITE, nil, OPEN_EXISTING, FILE_FLAG_OVERLAPPED, 0); GetCommState(Com1,DCB);// - получаем текущее DCB. DCB.BaudRate:=CBR_9600;// - устанавливаем скорость работы. DCB.Parity:=NOPARITY;// - устанавливаем отсутствие проверки на четность DCB.ByteSize:=8;// - 8 бит в передаваемом байте. DCB.StopBits:=OneStopBit;// - одино ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=82960