Einzelnen Beitrag anzeigen

Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.126 Beiträge
 
Delphi 10.3 Rio
 
#17

AW: Destruktor für verkettete Liste

  Alt 18. Jan 2021, 19:02
Hallo Mavarik,

Delphi-Quellcode:
procedure TListObjekt.ergaenze(neu: string);
var element: TListelement;
begin
  element:=TListelement.Create(neu);
  if start=nil then
  begin
    start:=element;
    aktuell:=element;
  end
  else
  begin
    endeListe;
    aktuell.next:=element;
    aktuell:=aktuell.next;
  end;
end;
Next ist ein privates Feld, Diese Feld kannst Du nur in der gleichen Unit erreichen... Das macht man so nicht!

Mavarik
  Mit Zitat antworten Zitat