Может кто кинет ссылку на инфу или расскажет, как работать с сom-портами.

а поискать слабо?
http://forum.vingrad.ru/index.php?showtopic=56400
http://forum.vingrad.ru/index.php?showtopic=48783
http://forum.vingrad.ru/index.php?showtopic=45795
и так далее...

спасибо. сорри не подумал даже.

DCB MyDCB;
int TSerialPort::Open(int Num)
{
int fl;
Number=Num;
sprintf(Name,"COM%d",Num);

COMMTIMEOUTS tout; // Ñòðóòóðà, îïèñàâàþùàÿ âðåìåíà îæèäàíèÿ (òàéìàóòû)

// Îòêðûòèå ïîðòà
Handle=CreateFile(Name,GENERIC_WRITE|GENERIC_READ,NULL,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
if(int(Handle)==-1) return -1;
//Çàäàíèå ðàçìåðà áóôåðà â áàéòàõ
fl=SetupComm(Handle,3000,3000); //
if(fl==0) return -1;
//Çàäàíèå òàéìàóòîâ
tout.ReadIntervalTimeout=100;
tout.ReadTotalTimeoutMultiplier=100;
tout.ReadTotalTimeoutConstant=100;
tout.WriteTotalTimeoutMultiplier=100;
tout.WriteTotalTimeoutConstant=100;
fl=SetCommTimeouts(Handle,&tout); // !!!
if(fl==0) return -1;

//Ñ÷èòûâàíèå òåêóùåãî ñîñòîÿíèÿ DCB (
fl=GetCommState(Handle,&MyDCB); // !!!
if(fl==0) return -1;

//Çàïîëíåíèå DCB
MyDCB.BaudRate=BaudRate; // current baud rate
MyDCB.fBinary=TRUE; // binary mode, no EOF check
MyDCB.fParity=TRUE; // enable parity checking
if(CTS_RTS_Enable)
{
MyDCB.fOutxCtsFlow=TRUE; // CTS output flow control
MyDCB.fRtsControl=RTS_CONTROL_ENABLE; // RTS flow control
}
else
{
MyDCB.fOutxCtsFlow=FALSE; // CTS output flow control
MyDCB.fRtsControl=RTS_CONTROL_DISABLE; // RTS flow control
}

MyDCB.fOutxDsrFlow=FALSE; // DSR output flow control
MyDCB.fDtrControl=DTR_CONTROL_DISABLE; // DTR flow control type

MyDCB.fDsrSensitivity=FALSE; // DSR sensitivity
MyDCB.fTXContinueOnXoff=0; // XOFF continues Tx
MyDCB.fOutX=0; // XON/XOFF out flow control
MyDCB.fInX=0; // XON/XOFF in flow control
MyDCB.fErrorChar=0; // enable error replacement
MyDCB.fNull=0; // enable null stripping

MyDCB.fAbortOnError=0; // abort reads/writes on error
MyDCB.XonLim=0; // transmit XON threshold
MyDCB.XoffLim=0; // transmit XOFF threshold
MyDCB.ByteSize=DataBit; // number of bits/byte, 4-8
switch(Parity)
{
case 'N': MyDCB.Parity=NOPARITY ;
break;
case 'O': MyDCB.Parity=ODDPARITY ;
break;
case 'M': MyDCB.Parity=MARKPARITY;
break;
case 'S': MyDCB.Parity=SPACEPARITY ;
break;
}
// 0-4=no,odd,even,mark,space
switch(StopBit)
{ case 1: MyDCB.StopBits=0; // 0,1,2 = 1, 1.5, 2
break;
case 2: MyDCB.StopBits=1;
}
MyDCB.XonChar=0; // Tx and Rx XON character
MyDCB.XoffChar=0; // Tx and Rx XOFF character
MyDCB.ErrorChar=0; // error replacement character
MyDCB.EofChar=0; // end of input character
MyDCB.EvtChar=0; // received event character
MyDCB.wReserved1; // reserved; do not use

//Íàñòðîéêà ïîðòà â ñîîòâåòñòâèè ñ çàïîëíåííûì DCB
fl=SetCommState(Handle,&MyDCB); // !!!
if(fl==0) return -1;
return 0;
}
writefile readfile для того чтобы писать и считывать

а как получить список портов?

HKEY_LOCAL_MACHINE\hardware\devicemap\serialcomm

спасибо