Resourcen in TStringlist konvertieren

[Sharky]

Hai Alexander,

Du musst die TStringList (sl) erst erzeugen bevor Du damit arbeiten kannst.
Das könnte zum Beispiel so aussehen:

Delphi-Quellcode:

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