Resourcen in TStringlist konvertieren

[Alexander Roth]

Hatte ich auch eben bemerkt. Schon korrigiert, aber die Felhermeldung bleibt.

Ach ja was noch wichtig sein könnte:   rs.SaveToFile('C:\res.txt'); Das klappt.


PS: Immer diese kleinen dummen Flüchtigkeitsfehler.

[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;

[Alexander Roth]

Es klappt.

Danke euch allen.


Schöne Fastnacht.