String in Exe suchen ?!? BSP funzt nicht

[stoxx]

Hallo,

ich kann doch eine Exe auch in einen normalen TextEditor laden.
Oder in einem Hex Editor erscheint der String ja auch
Wenn #13#10 in der exe ist, dann sollte das doch erstmal kein problem sein.
Warum funktioniert dieses Beispiel nicht ? Der String wird in der eigenen Exe nicht gefunden.
Wie funktioniert es dann ?
Danke !

Code:

procedure TForm1.Button1Click(Sender: TObject);
var
 a, pfad  : string;
 f : Textfile;
 st : ansistring;
begin
 a := 'Gc684mf';
 caption := a;

 pfad := paramstr(0);

 assignfile(f,pfad);
 reset(f);

 while not eof(f) do
 begin
   readln(f,st);
   if StrStrCount(st, a) <> 0 then  showmessage('gefunden');
   if AnsiStrPos(Pchar(st),Pchar(a)) <> nil then showmessage('gefunden');
   if pos(a,st) <> 0 then showmessage('gefunden');
 end;

closefile(f);


end;