Text-Dateien in Delphi7

[Frischling]

Nach unzähligen Stunden des Probierens bin ich am Verzweifeln. Ich hänge immer bei dem Problem fest, dass ich TStrings nicht in Memo-Feldern ausgeben kann.
Bis jetzt habe ich 2 halbe Programme zu einem zusammengeschraubt, um wenigstens mal eine Ausgabe zu bekommen:

Delphi-Quellcode:

function parse(s: string):TStringList;
var s:string;
begin
   result := TstringList.Create;
   result.CommaText := s;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  close;
end;


procedure TForm1.ComboBox1Change(Sender: TObject);

begin
   s :='"Azuras Stern","Fundort: Azuras Schrein","Voraussetzung: Stufe 2","Opfergabe: Glühstaub"';

   memo1.lines.Commatext := s;
end;

begin
  strings := TStringList.Create;

  try
    path := ExtractFilePath(ParamStr(0));
    path := path + 'Testdatei.txt';


    strings.LoadFromFile(path);

    if strings.Count > 0 then
    begin
      for i := 0 to strings.Count - 1 do
        begin

        end;
     end;
  finally
    strings.Free;
  end;

Ich würde nun gerne der Variablen s die Werte aus strings übergeben, was aber an TString/String scheitert. Gibt es da eine Möglichkeit für, denn dann könnte ich vlt. weiterkommen*hofft*

P.s.
Delphi-Hilfe/Suche/Google wurde ausreichend genutzt. Hat leider nichts gebracht.