Resourcen in TStringlist konvertieren

[Heffalump]

Einfacher Fehler. Du benutzt bei LoadFromStream nicht das erzeugte Streamobject, sondern das als Variable deklarierte und nicht vorhandene. Versuche es mal so:

Delphi-Quellcode:

var rs:TResourceStream; 
    sl:Tstringlist; 
begin 
  sl := TStringList.Create; 
  try 
    rs := TResourceStream.Create(0,'mytext',PChar('RT_RCDATA'));
    sl.LoadFromStream(rs);
    rs.free;
    showmessage(sl[1]); 
  finally 
    sl.Free; 
  end; 
end;