Variablen in Variablen packen

[Njorl]

Bin erst heute dazu gekommen es mal auszuprobieren, zeigt sehr gut wie's geht, nochmal vielen Dank.
Blöderweise klappt es in der Praxis in meinem Projekt immer noch nicht, ich kriege immer noch die Zugriffsverletzung beim Assignen bei GetText, und auch wenn ich versuche manuell eine von meinen 'Ziel-Variablen' (X und Y in deinem Beispiel) zu assignen. Ich dachte eigentlich ich hätte auch alles richtig deklariert und initiiert:

Delphi-Quellcode:

public
    { Public-Deklarationen }
    noteArmory, noteGear, noteAlts, noteAttunement, noteContacts :TStrings;
    noteHours, noteMotivation, noteGearing, noteRole, noteHistory :TStrings;
    noteComputer, noteContactInfo, varNote :TStrings;
    procedure SetNote (Place: string; varNote :TStrings);
  end;

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  // Objekte initiieren ist wichtig!!!
  noteArmory := TStringList.Create;
  noteGear := TStringList.Create;
  noteAlts := TStringList.Create;
  noteAttunement := TStringList.Create;
  noteContacts := TStringList.Create;
  noteHours := TStringList.Create;
  noteMotivation := TStringList.Create;
  noteGearing := TStringList.Create;
  noteRole := TStringList.Create;
  noteHistory := TStringList.Create;
  noteComputer := TStringList.Create;
  noteContactInfo := TStringList.Create;
end;

Delphi-Quellcode:

procedure TForm1.SetNote (Place: string; varNote :TStrings);
  begin
  // formNoteWindow.Caption := Place;
  // Text in den Editor schieben
  if VarNote <> nil then formNoteWindow.SetText(varNote);
  // nur wenn OK gedrückt wurde (siehe Modal-Result der beiden
  // Buttons nei der Editor-Form)
  if formNoteWindow.ShowModal = mrOK then
    // Hole den text zurück
    formNoteWindow.GetText(varNote);
  // säubere Editor
  formNoteWindow.ClearText;
  end;

Delphi-Quellcode:

procedure TformNoteWindow.GetText(varNote: TStrings);
begin
  // den übergeben Strings die DATEN des Memos setzen
  varNote.Assign(memoNoteWindow.Lines);
end;

Nachdem ich jetzt stundenlang ergebnislos auf den code gestarrt habe ohne den Fehler zu finden muss ich dich leider nochmal damit belästigen