Hallo Nico,
wenn PascalScript Zeiger-Arithmetik beherrscht, dann kannst du den Aufruf von CompareMem() in Hawkeyes Funktion durch eine eigene Funktion unterstützen:
Delphi-Quellcode:
function CompareMem(P1, P2: PChar; Length: Integer): Boolean;
begin
Result := False;
while Length > 0
do
if P1^ = P2^
then
begin
Dec(Length);
Inc(P1);
Inc(P2);
end else Exit;
Result := True;
end;
Grüße vom marabu