Delphi Załadowanie listy do comboboxa z pliku txt

W zależności co wybieram w pierwszym comboboxie ma ładować się inna lista w drógim jak to zrobić ? na razie udało mi się tylko tak że ładują się wszystkie linijki w jednym indexie ;/

Case/if + ItemIndex?

---

Wariant pierwszy: ```delphi Case ComboBox.ItemIndex Of -1: raise Exception.Create('Ty oszukać system, bo ty nic nie wybrać, więc program teraz rzucić wyjątek :<'); 0: Memo.LoadFromFile('lista pierwsza.txt'); 1: Memo.LoadFromFile('lista druga.txt'); /* tutaj lepiej jest zastosować tablicę, ale chciałem zobrazować rozwiązanie */ ```

Wariant drugi:

if (ComboBox.ItemIndex <> -1) Then
 Memo.LoadFromFile('lista'+IntToStr(ComboBox.ItemIndex)+'.txt');

Nie o to mi chodziło ale sobie poradziłem :D Zrobiłem to tak

      AssignFile(plik,'./Clubs/Polska/e.txt');
        Reset(plik);
          Repeat
            Readln(plik,klub);
            ComboBox8.Items.Append(klub);
          Until Eof(plik);
        Flush(plik);
      CloseFile(plik);

Tak także powinno działać:

ComboBox8.Items.LoadFromFile('666.txt')

Btw, po co flushujesz plik, skoro nic do niego nie piszesz?

Kiedyś mi wkuli w banie i tak mi zostało :D

To wkuj sobie do łba, że po to piszesz pod VCL żeby się wspomóc jego konstrukcjami i możliwościami. A jeżeli chcesz wszystko ręcznie rzeźbić to zainteresuj się WinAPI i pod nim koduj. Poza tym pytania o banalne podstawy zadajemy w dziale Newbie i tagujemy wątki nazwą środowiska lub języka!!! Tym razem (znowu) poprawiam.