lineare liste mit pointer

[bonanza]

Hi,

ich versuche mich gerade an einer Linearen liste mit pointern...

dafür habe ich mir DIESES Tutorial angeschaut....


und dementsprechend habe ich es so veruscht:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
     TDaten     = integer;
     TToElement = ^TElement;
     TElement   = record
                    Daten : TDaten;
                    ToNext: TToElement;
                  end;


  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  wurzel, ll:Ttoelement;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject); {push}
var Element: TToElement;
begin
  New (Element);
  Element^.Daten := random(20)+1;
  Element^.ToNext:= ll;
  ll         := Element;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  ll := nil;
end;

procedure TForm1.Button2Click(Sender: TObject);

var Element: TToElement;
begin
    pop    := ll^.Daten; //<-------- *1
    Element:= ll;
    ll := ll^.ToNext;
    Dispose (Element);
end;

end.

da ich das selbe wort wie im tutorial "pop" (markierte Zeile *1) benutzt habe funktioniert es natürlich nicht, aber meine frage ist, was ist diese Pop ? ist es die "wurzel" , die auf das 1. element zeigt oder was ?
Und was müsste ich dementsprechend abändern ?

danke schomal im voraus !