Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Опять...Первый COM комом... [Win2k]


tovSuhov ©   (2003-05-23 14:25:00) 

Ух... Прмерчик взял из сети для работы с COM портом. А он не робит.
На попытку записать данные в ком выдает ошибку "неверный дескриптор"
Текст на С++ (под С++ Builder), но , думаю, довольно понятен.
[code]
TDCB mDCB;
HANDLE hCOM=CreateFile("COM1",GENERIC_WRITE,0,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
if (hCOM!=INVALID_HANDLE_VALUE)
{
Panel1->Caption = "COM1 is open OK!";
char buffer[30];
memset(buffer,0,sizeof(buffer));
strcpy(buffer,"SAVE TO COM1");
DWORD nb = strlen(buffer);
OVERLAPPED ov;
GetCommState(hCOM,&mDCB);
mDCB.BaudRate=CBR_9600;
mDCB.Parity=NOPARITY;
mDCB.ByteSize=8;
mDCB.StopBits = ONESTOPBIT;
mDCB.EvtChar= "\r";
SetCommState(hCOM,&mDCB);
WriteFile(hCOM,buffer,nb,&nb,&ov);
ShowMessage(SysErrorMessage(GetLastError()));
// вот тут GetLastError = 6, а до этого все нормально
CloseHandle(hCOM);
}
else Panel1->Caption ="Error Open COM1";
[/code]

Сегодня первый день с КОМами работаю, может что упустил?


tovSuhov   (2003-05-23 14:42:00) [1]

Класс!!! Наконец-то оно работает!!! УРА!
Ребята, спасибо что вы есть!


tovSuhov   (2003-05-23 14:39:00) [2]

Точно, Overlapped... Огромное спасибо!


tovSuhov   (2003-05-23 14:34:00) [3]

Глядел. На их основе и писал. Логика ясна, неясно где ошибки реализации...


clickmaker   (2003-05-23 14:33:00) [4]

Ну, во-первых, раз уж подсовываешь OVERLAPPED, то открывать файл надо с флажком FILE_FLAG_OVERLAPPED.
И потом, как же ты запустил асинхронный процесс и тут же говоришь CloseHandle? Да еще тут же хочешь результат получить от GetLastError... Дождаться надо, когда он хоть что-то запишет... Либо писать без Overlapped.


MBo   (2003-05-23 14:27:00) [5]

В Статьи загляни. Там 3 штуки о компорте


Наверх

Титульная страница Поиск, карта сайта Написать письмо