Как получить перечень COM-портов в системе? (Win2k, XP, NT4)

А исчо можно вот так!:


for(short int PortNumber=1; PortNumber<256; PortNumber++)
{
AnsiString PortName = (PortNumber > 9) ? "\\\\.\\COM" + IntToStr( PortNumber ) : "COM" + IntToStr(PortNumber);
HANDLE hPort = CreateFile(PortName.c_str(), GENERIC_READ||GENERIC_WRITE, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
if(hPort != INVALID_HANDLE_VALUE)
cbPort->Items->Add(PortName);
CloseHandle(hPort);
}
if(cbPort->Items->Count) cbPort->ItemIndex = 0;
else ShowMessage("У Вас нету доступных СОМ-портов!!!");

Та, надо мне ещё на чужие грабли наступать, если весь код в 4 строчки умещается!