Hi folks,
ich habe die Frage vielleicht ganz anders (falsch?) verstanden, aber ich denke dabei an sowas:
Delphi-Quellcode:
uses
StrUtils;
var
s, subStr: String;
bFound: Boolean;
begin
s := '1234567890123456demo1234567890';
subStr := 'demo';
bFound := CompareMem(@s[17], @subStr[1], Length(subStr));
ShowMessage(IfThen(bFound, 'found', 'not found'));
end;
Grüße vom marabu