>= größer kleiner bin ich zu dumm

[Oxmyx]

Zitat von Wheelie:

Funktioniert problemlos

Ok, da denkt der Delphi-Compiler noch mit. Aber das hier funktioniert bei mir nicht mehr:

Delphi-Quellcode:

var
  str0, str1, str2: PChar;
begin
  str0 := '1234';
  GetMem(str1, 4); ZeroMemory(str1, 4);
  GetMem(str2, 4); ZeroMemory(str2, 4);
  Move(str0^, str1^, 4);
  Move(str0^, str2^, 4);
  if str1 = str2 then begin
    // wird nicht ausgeführt
  end;
end;

In beiden Strings steht exakt das selbe drin, trotzdem liefert der Vergleich ein False.