Moin,moin!
Ich möcht mich hier auch noch mal einklinken. Mit der Compare-Methode von TList habe ich ein kleines Problem.
Es gibt ja das schöne Beispiel aus der Hilfe:
Delphi-Quellcode:
function CompareNames(Item1, Item2: Pointer): Integer;
begin
Result := CompareText((Item1 as TComponent).Name, (Item2 as TComponent).Name);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
List1.Sort(@CompareText);
end;
Das Problem ist, dass der
as operator nicht mit
Pointer funktioniert. Ergo auch das Beispiel funktioniert nicht.
Kann mir jemand sagen wie ich einen
Pointer-Inhalt auf eine Klasse casten kann?
Ansonsten kann ich nicht auf die Inhalte des
Pointers zugreifen.
Irgendwie benötige ich die funktionalität : (
Pointer as Class)
MfG
st-matze