Odczyt portów dostępnych w systemie
Aby po uruchomieniu programu do komponentu ComboBox1 zostały wpisane nazwy dostępnych portów:
#include <Registry.hpp>
void __fastcall TForm1::FormCreate(TObject *Sender) { TRegistry& regKey = *new TRegistry(); regKey.RootKey = HKEY_LOCAL_MACHINE; bool keyGood = regKey.OpenKey("HARDWARE\\DEVICEMAP\\SERIALCOMM", false); if (keyGood) { regKey.GetValueNames(ComboBox1->Items); for(int i = 0; i < ComboBox1->Items->Count; i++) { ComboBox1->Items->Strings[i] = regKey.ReadString(ComboBox1->Items->Strings[i]); } } delete ®Key; }