for (j=0; j<ListBox1->Count; j++) { wq = ListBox1->Items->Strings[j]; if (IP_list!=wq) ListBox1->Items->Add(IP_list); else { MessageDlg("Такой адрес уже есть!", mtError, TMsgDlgButtons() << mbOK, 0); break; } }
bool b = false;for (j=0; j<ListBox1->Count; j++) { wq = ListBox1->Items->Strings[j]; if (IP_list==wq) { b = true; break; } } if(not b) ListBox1->Items->Add(IP_list); else MessageDlg("Такой адрес уже есть!", mtError, TMsgDlgButtons() << mbOK, 0);