Zeiger, anonyme Objekte und Listen

[3_of_8]

Delphi-Quellcode:

procedure TWeek.Add(const ADay : TDay);
begin         
  Add(@ADay);
end;

Wenn TDay wirklich eine Klasse ist, dann ist das eine verdammt schlechte Idee. Ein Pointer auf einen Instanzenpointer... da kommt nix gutes raus. Schreib einfach Add(Pointer(ADay));