Zaznaczone itemy CheckListBox do StringList

[simekone]

Kod:

Kod: Zaznacz cały

TStringList *wybrane = new TStringList;

for (int i = (CheckListBox1->Items->Count); i < 0; i--) {
   if (CheckListBox1->Checked[i]) {
      wybrane->Add(CheckListBox1->Items[i]);
   }
}

Błędy:

Kod: Zaznacz cały

[BCC32 Error] unit.cpp(38): E2034 Cannot convert 'TStrings' to 'UnicodeString'
[BCC32 Error] unit.cpp(38): E2342 Type mismatch in parameter 'S' (wanted 'const UnicodeString', got 'TStrings')

Może i jest lepsze rozwiązanie, dlatego opowiem w skrócie co i jak chce uzyskać.

Przy uruchamianiu programu itemy w CheckListBox wczytywane są z pliku INI. Użytkownik wybiera (w założeniu do 5) itemeków z CheckListBox, po kliknieciu Buttonu wybrane itemy są przypisywane jako Caption dla 5 kolejno ułozonych i nazwanych buttonów.

[simekone]

Poradziłem sobie, działający kod wygląda następująco:

Kod: Zaznacz cały

for (int i = 0; i < CheckListBox1->Count; i++) {
   if (CheckListBox1->Checked[i]) {
     wybrane->Add(CheckListBox1->Items->Strings[i]);
   }
}

CheckListBox1->Items = wybrane;

@CyfrowyBaron
Możesz dodać na stronę, jeśli uznasz, że jest to przydatne ; )