Thema
:
Delphi
Problem mit Zeigern
Einzelnen Beitrag anzeigen
Macci
Registriert seit: 31. Mai 2007
129 Beiträge
#
10
Re: Problem mit Zeigern
29. Feb 2008, 21:02
Warum nicht einfach so?
zusammenfalten
·
markieren
Delphi-Quellcode:
PROCEDURE
push(
VAR
zkopf:tzeiger;inhalt:char);
VAR
zhilf,zneu:tzeiger;
BEGIN
zhilf:=zkopf;
WHILE
NOT
(zhilf^.next=NIL)
DO
zhilf:=zhilf^.next;
new(zneu);
zneu^.inhalt:=inhalt;
zhilf^.next:=zneu;
zneu^.next:=NIL;
END
;
Zitat
Macci
Öffentliches Profil ansehen
Mehr Beiträge von Macci finden