Hexwert in Binärdatei suchen und Position ermitteln

[fringer]

@Delphi.Narium
Vielen Dank für deine Antwort, es kann vielleicht wirklich sein,
das ich meine Anforderung schlecht ausgedrückt habe.

Daher noch einmal mein Anliegen:

In einer Datei xyz.dat (siehe 7zip-Archiv im Anhang, Virengeprüft!)
soll die Hex-Sequenz "58 50 52 30 00 28" (oder Ansi-Sequenz "XPR0.(" gesucht werden. Wenn diese
gefunden werden sollte, soll die Anfangsposition der Sequenz in der Datei via "showmessage" angezeigt werden.

Im Falle dieser Testdatei wäre es die Position "$0040F7F8".

In einem vorangegangenen Projekt habe ich die Position in einer
in den Stream geladenen Datei so definieren können (Siehe Code unten). Daher dachte
ich muss es auch umgekehrt möglich sein, das ich mir die Position
ausgeben lassen kann indem ich den Stream nach der gesuchten
Hex- oder Ansi-Sequenz durchsuchen lassen kann.

Code:

  

var
  loadstrm : TMemorystream;
  offsetadr : Integer;

...

begin
loadstrm := TMemoryStream.Create;         // Eröffne Stream
offsetadr := $003E1000;                   // Setzte Startadresse
try
loadstrm.LoadFromFile(opendialog1.FileName);  // Lade Datei in Stream 
loadstrm.Position := offsetadr;               // Gehe in Stream an die Startadresse

...