Einlesen einer r-Code Quelldatei

[pascalsg77]

Hallo,

für mein kleines Suchprogramm (in Delphi) muss ich in allen Dateien eines Verzeichnisses und dessen Unterver-
zeichnissen nach einer bestimmmten Zeichenkette suchen. Bei normalen Textdateien funktioniert dies einwandfrei.
Jetzt muss ich aber .r-Dateien durchsuchen (compilierter Progressquelltext) und bekomme in meinem Memofeld
nur noch wenige Zeichen bestehend aus schwarzen Kästchen, Strichen, Balken - also total unsinniges Zeug angezeigt.
Öffnet man nun so eine Datei im Notepad, so ist der Inhalt der Datei richtig dargestellt (mehrere Zeilen Text),
und der String kann mittels Suche auch gefunden werden.

Zum Laden der Datei in meinem Programm habe ich bereits mehrere Verfahren ausprobiert: Readln(textdatei,String),
FileStream, StringStream, direktes laden des Textes durch Memo1.Lines.LoadFromFile(....) usw.
Auch versch. Komponenten habe ich eingesetzt: Memo, Richedit, SynEdit, TntMemo, AdvMemo von TmsSoftware.
Alles leider ohne Erfolg.

Einzig und allein die Datei als File of Byte zu deklarieren und dann jedes Byte einzeln einzulesen
und mittels Chr()-Funktion umzusetzen funktioniert. Jedoch dauert der Einlesevorgang ziemlich lange.

Es muss doch auch eine einfachere Möglichkeit geben, den Dateiinhalt mit all seinen (Steuer-)Zeichen einzulesen
und nach der Zeichenkette zu durchsuchen.

Als Beispiel habe ich mal so eine Datei angehängt, die auch nicht eingelesen werden kann.
Ggfs. hat einer von Euch ja bereits so ein Problem behandelt oder kennengelernt.