TObjectList - Sort crash (D7)

[o-sch]

Zitat von dfried:

Das ist glaub ich schon klar, nur wenn der Sourcecode den du oben aufgelistet hast per Copy & Past aus deinem Delphi ist, dann ist der Fehler, dass du dort auf ein "pmyItem" verweist und nicht auf pmyItem1 oder pmyItem2!

Der Code wird nicht 1:1 benutzt, sondern ist stark vereinfacht. Das ist ein Fehler in der Fehlerbeschreibung

Delphi-Quellcode:

function MyListCompare(pmyItem1, pmyItem2: pointer): integer;
  begin
    Result := 0
    if TmyItem(pmyItem1).V1 > TmyItem(pmyItem2).V1 then Result := 1;
    if TmyItem(pmyItem1).V1 < TmyItem(pmyItem2).V1 then Result := -1;
  end;