Stringlist add ResourceStream

[Lannes]

Hallo,

wie kann ich -möglichst ohne weitere Umwege-
Daten aus eine Resource an eine Stringliste anhängen?

Mein bisheriger Code(Ausschnitt):

Delphi-Quellcode:

rs := TResourceStream.Create(hinstance, 'TXT_START', RT_RCDATA);
try
  SLStart.LoadFromStream(rs);
  finally
  rs.Free;
  end;
//...
SLStart.add('diese, und noch mehr Zeilen');
//...
rs := TResourceStream.Create(hinstance, 'TXT_START2', RT_RCDATA);
  try
  //SLStart.??????? LoadFromStream(rs);<----------??????
  finally
  rs.Free;
  end;

Schönen Dank im Voraus,

//edit SLSuchen.add durch SLStart.add ersetzt

[Lannes]

Hallo,

scheint wohl nicht ohne Umwege zu gehen.

Wenn es jemand gebraucht, hab es jetzt so gelöst:

Delphi-Quellcode:

procedure XXX;
var rs: TResourceStream;
    SLStart, SLTemp : TStringlist;
begin
  SLStart := TStringlist.Create;
  SLTemp := TStringlist.Create;
  try
    rs := TResourceStream.Create(hinstance, 'TXT_START', RT_RCDATA); 
    try 
      SLStart.LoadFromStream(rs); 
    finally 
      rs.Free; 
    end;
//... 
    SLStart.add('diese, und noch mehr Zeilen');
//... 
    rs := TResourceStream.Create(hinstance, 'TXT_START2', RT_RCDATA); 
    try
      SLTemp.LoadFromStream(rs);    //<----------
      SLStart.AddStrings(SLTemp);   //<----------
    finally
      SLTemp.Clear; 
      rs.Free; 
    end;
//... Daten weiter verarbeiten
  finally
    SLStart.Free;
    SLTemp.Free;
  end;
end;

Vielen Dank für eventuelle Bemühungen