CheckListBox und Memo verwenden

[Kunoishi]

ihr habt mir bestens geholfen bei dem Thema CheckListBox
nun habe ich eine weiter frage
ich habe euer beispiel eingesetzt

Delphi-Quellcode:

procedure TSachverhaltForm.AnzeigengrundBoxClick(Sender: TObject);
var
  I: Integer;
  s: String;
begin                                               
  S:='';
  with AnzeigengrundBox do
    for I:= 0 to Count - 1 do
     if Checked[i] then
      if s='' then s:= Items[i]
        else S:= s +', ' +Items[i];
   EditAnzeigengrund.Text:=(s);
end;

hierzu ist mein String
Blume
Wasser
Erde
Sand
Dünger
Licht
Schatten

wie schaffe ich es jetzt, dass bei auswahl in meinem checklistBox
ich in einem Memofeld eine info zur Blume kommt wenn ich auf blume tippe

oder wenn ich auf wasser tippe ich eine info im Memofeld zu wasser bekomme.
das ganze in ein und dem Selben Memofeld ohne das der inhalt der vorrangegangen auswahl stehen bleibt?