CSV auslesen in EDIT eintragen

[Knotti2005]

Also ich hab mir selbst geholfen...

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);  
var CSVDatei : TStringList;  
begin  
  randomize;  
  CSVDatei := TStringList.Create;  
  CSVDatei.LoadFromFile('c:\mycdsdatei.cvs');  
  Edit1.Text := CSVDatei[random(CSVDatei.Count)];  
  Edit2.Text := CSVDatei[random(CSVDatei.Count)];  
  Edit3.Text := CSVDatei[random(CSVDatei.Count)];  
  Edit4.Text := CSVDatei[random(CSVDatei.Count)];  
  Edit5.Text := CVVDatei[random(CSVDatei.Count)];  
  Edit6.Text := CSVDatei[random(CSVDatei.Count)];  
  CSVDatei.Free;  
end;

Nun diese Beispiel ist für nur eine Datei wie bringe ich es dazu 2 Dateien auszulesen. Die Namen sollen in die Edit Felder aber nicht doppelt erscheinen.