#define CLASSGUID GUID_DEVCLASS_PORTS
#define IFACE_GUID GUID_DEVCLASS_PORTS




	Label5 -> Caption = ("Устройство не обнаружено"); 
//ComboBox6->Items->Clear();
	HDEVINFO hDevInfo;
	SP_DEVINFO_DATA DeviceInfoData;
	DWORD i;
	   // Create a HDEVINFO with all present devices.
	_GUID GUIDCLASS;//{36FC9E60-C465-11CF-8056-444553540000};

	hDevInfo = SetupDiGetClassDevs(&CLASSGUID,//NULL,
								   0, // Enumerator
								   0,
								   DIGCF_PRESENT | DIGCF_INTERFACEDEVICE );

	if (hDevInfo == INVALID_HANDLE_VALUE)
	{
		GetErrorLast
	}
	DeviceInfoData.cbSize = sizeof(SP_DEVINFO_DATA);
	for (i=0;SetupDiEnumDeviceInfo(hDevInfo,i,&DeviceInfoData);i++)
	{   //Memo1->Lines->Add(i);
		DWORD DataT;
		LPTSTR buffer = NULL;
		DWORD buffersize = 0;
		buffersize = 80;
		buffer = (char *)LocalAlloc(LPTR,buffersize);

		while (!SetupDiGetDeviceRegistryProperty(hDevInfo,
												 &DeviceInfoData,
												 SPDRP_MFG,//DEVICEDESC,
												 &DataT,
												 (PBYTE)buffer,
												 buffersize,
												 &buffersize))
		{
			if (GetLastError() == ERROR_INSUFFICIENT_BUFFER)
			{   // Change the buffer size.
				if (buffer)
					LocalFree(buffer);
				(HANDLE)buffer = LocalAlloc(LPTR,buffersize);
			}
			else
			{// Insert error handling here.
				break;
			}
		} // Memo1->Lines->Add((char*)buffer);
		if (((AnsiString)((char*)buffer))==("FTDI"))
		{
			while (!SetupDiGetDeviceRegistryProperty(hDevInfo,
													 &DeviceInfoData,
													 SPDRP_FRIENDLYNAME,//SPDRP_MFG,//DEVICEDESC,
													 &DataT,
													 (PBYTE)buffer,
													 buffersize,
													 &buffersize))
			{
				if (GetLastError() == ERROR_INSUFFICIENT_BUFFER)
				{   // Change the buffer size.
					if (buffer)
						LocalFree(buffer);
					(HANDLE)buffer = LocalAlloc(LPTR,buffersize);
				}
				else
				{ // Insert error handling here.
					break;
				}
			}
			Label5 -> Caption = ((char*)buffer);
			char * St = 0;
			char * rt = "";
			St = strstr((char*)buffer,"COM");
			rt = strstr((char*)buffer,")");
			*(unsigned char*)rt=0;
			if (St)
			{
				ComboBox5->Text = St;
			}
		}
	}
	if ( GetLastError()!=NO_ERROR &&
		GetLastError()!=ERROR_NO_MORE_ITEMS )
	{    // Insert error handling here.
		MessageBox( NULL, "Normal", "Error", MB_OK | MB_ICONSTOP );
	}
	SetupDiDestroyDeviceInfoList(hDevInfo);