Combobox und Listen.txt

[Heiko next]

Ich bin ein grausamer Delphi Anfänger, also bitte nicht gleich aufregen wenn ich doofe Fragen stelle!!!

Ich bin an einem Projekt welches ich am liebsten morgen beenden möchte. Also mein Problem: ich habe 2 Comboboxen und mehrere listen in einem Ordner als .txt gespeichert in der 1. Combobox steht jeder 2te eintrag aus der z.B. Kategorie.txt liste mit dem Code:

Delphi-Quellcode:

procedure TForm2.ComboBox1Change(Sender: TObject);
var
    i: integer;
    picFile: string;
begin
    i := (((ComboBox1.ItemIndex + 1) * 2) - 1);
    picFile := MyList.Strings[i];
    if FileExists(picFile) then begin

end;
end;

Die Liste wurde vorher mit diesem Code ins Programm geladen:

Delphi-Quellcode:

  const
   MyTextFile = 'Kategorie.txt';

procedure TForm2.FormCreate(Sender: TObject);
var
    i: integer;
begin
    MyList := TStringList.Create;
    if FileExists(MyTextFile) then begin
        MyList.LoadFromFile(MyTextFile);
        for i := 0 to (MyList.Count - 1) do begin
            if (i mod 2 = 0) then ComboBox1.Items.Add(MyList.Strings[i]);
        end;
    end;

Nun habe ich in der Liste Kategorie.txt z.B.
Vorspeise warm
warm.txt
Vorspeise kalt
kalt.txt

Später wird die liste um z.B.:
Dessert
dessert.txt
erweitert.

Nun soll er die angegegebenen Listen z.B. warm.txt in die 2te Combobox laden und vorher natürlich createn.

Kann mir jemand verraten wie das gehr?