Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Prob. mit Klasse und Record


wunsiedler - Fr 22.10.04 14:22
Titel: Prob. mit Klasse und Record
Hallo,

warum bringt der mir hier ne Fehlermeldung. Definiere eine class. In der class will ich ein Record und ein paar andere Variablen anlegen. Aber es geht nicht. Fehlermeldung bleibt gleich hinter dem record-TYPE stehen.
Hier mal der Code:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
// Klasse anlegen
Type TAdresse = class

  // Hier wird das Record angelegt
  type TDaten    : Record
   id            :               integer;
   Firma         :               string[50];
   Vorname       :               string[50];
   Nachname      :               string[50];
  end;

 daten           :               Tdaten;

End;

var Adresse : TAdresse;


Moderiert von user profile iconChristian S.: Code- durch Delphi-Tags ersetzt.


jasocul - Fr 22.10.04 14:28
Titel: Re: Prob. mit Klasse und Record
wunsiedler hat folgendes geschrieben:
Hallo,

warum bringt der mir hier ne Fehlermeldung. Definiere eine class. In der class will ich ein Record und ein paar andere Variablen anlegen. Aber es geht nicht. Fehlermeldung bleibt gleich hinter dem record-TYPE stehen.
Hier mal der Code:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
// Klasse anlegen
Type TAdresse = class

  // Hier wird das Record angelegt
  type TDaten    : Record
   id            :               integer;
   Firma         :               string[50];
   Vorname       :               string[50];
   Nachname      :               string[50];
  end;

 daten           :               Tdaten;

End;

var Adresse : TAdresse;




Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
// Klasse anlegen
Type
  TDaten    : Record
   id            :               integer;
   Firma         :               string[50];
   Vorname       :               string[50];
   Nachname      :               string[50];
  end;
TAdresse = class

 daten           :               Tdaten;

End;


So sollte es funzen

Moderiert von user profile iconChristian S.: Code- durch Delphi-Tags ersetzt.


wunsiedler - Fr 22.10.04 14:35

Man muss also das Record seperat definieren und dann in die Klasse einbinden, OK funktioniert. danke.