Stringreplace mit einer unbekannten

[ReVenGer]

Hi, ich möchte einen string erstzen der aus vier bytes und einem unbekannten besteht.
Nun hab ich schon einiges probiert aber irgendwie komme ich zu keinem vernünftigen ergebnis.

Delphi-Quellcode:

var
 s : string;

begin
 Form3.Memo1.Text:=StringReplace(Form3.Memo1.Text,'3B 00 01 00 ' + (s,1),'3B 00 01 00 02',[rfReplaceAll, rfIgnoreCase]);
end;