@Dax:
Das geht auch so herum, daran liegt es nicht.
Es liegt wohl eher daran, dass Zeiger und Liste noch in der Klasse TForm1 stehen.
Mein Vorschlag:
Delphi-Quellcode:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 =
class(TForm)
Button1: TButton;
private
{ Private declarations }
public
{ Public declarations }
end;
// <-- Kalsse "TForm1" erst beenden,
// dann erst "Zeiger" und "Liste" deklarieren!
Zeiger = ^Liste;
Liste =
Record
Daten : Integer;
Next : Zeiger
End;
var
Form1: TForm1;
Anfang, ListenElement, NeuesElement : Zeiger;
implementation
{$R *.dfm}
end.
//Edit:
Sorry
Der ganze private/public Teil muss natürlich auch mit nach oben!