Daten beim einlesen verschluckt, warum?

[BrunoT]

Hi MasterOf,

wo tritt der Fehler auf?

imho sollte es auf jeden fall so gehen:

Delphi-Quellcode:

Type
   TDaten = Record
          Daten: string[255];
              end;
var
  frmmain: Tfrmmain;
implementation

{$R *.dfm}

procedure Tfrmmain.FormCreate(Sender: TObject);
var myfile :Textfile; //Textdatei
    Zeile : string[255];  //zum Einlesen
    i, zeiger: integer;
    data: Tdaten;
begin
if opendialog.Execute then
begin
  i:=0;
  assignfile(myfile, opendialog.FileName);
  reset(myfile);
  try
   while not eof(myfile) do
   begin
    ReadLn(myfile,zeile);
    data.daten:=zeile; // sollten doch wohl zuweisungskompatibel sein
    memdaten.Lines.Add(data.daten);


    end;

mfg

BrunoT