Erklärung von record (Delphihilfe unverständlich :))

[mkinzler]

Zitat:

da ich noch kein "fortgeschrittener" bin, wollte ich mal die frage stellen, ob die records dann so etwas ähnliches wie eine klasse ist?

Nein. Da sie keine Methoden besitzen. Records werden auch heterogene Bereichsvariablen oder Strukturen bezeichnet.

[alzaimar]

Spätestens seit BDS 2006 kann man in Records auch Methoden verwenden.

Zitat von 3_of_8:

Beispiel:

Delphi-Quellcode:

type
  TARGB=record
  case Integer of
  0: (Value: Integer);
  1: (A, R, G, B: Byte);
  end;

//...
myARGB.Value:=$000000FF;
//...ist das gleiche wie...
myARGB.R:=255;

Nee. Nicht ganz (aber das weisst Du selber). Die Zeile
myARGB.Value:=$000000FF; verändert alle vier Bytes (A=255 und R,G,B = 0), während
myARGB.R:=255; Nur das eine Byte (Das zweite von rechts ) verändert.

Ein 'Record' ist imho ein Überbleibsel aus den Anfängen der strukturierten Programmierung. Um alle Bits eines Bytes (in Standardpascal) anzusprechen, blieb nur dieses Konstrukt (AND/OR auf Byte-Ebene ging nicht, einer der Gründe warum es dann mal 'Turbopascal 1.0' gab):

Delphi-Quellcode:

Type
  TNibble = 0..15;
  TBitsNibblesAndByte = Packed Record
    Case Integer Of
     0 :  (TheByte : 0..255);
     1 : (TheNibbles : Array [0..1] Of TNibble);
     2 : (The Bits : Array [0..7] Of Boolean);
  End;

Das 'packed' veranlasst(e) den Compiler, das Record so dicht wie möglich zu packen. Da ein Boolean genau ein Bit benötigt, ein Nibble (0..15) genau 5 bits, kann man so bei einem Byte sowohl auf die Nibbles (halbe Bytes) als auch auf die einzelnen Bits zugreifen. Leider klappt das mit dem Packed heute nicht mehr.

Bei der Programmierung von Treibern (ja ja, ging früher, unter Win32 nicht mehr so leicht) sind häufig die Statusinformationen in den einzelnen Bits eines Statusbytes/Wortes kodiert. Durch die Deklaration eines geeigneten 'Packed Records' konnte man dann sehr elegant auf die einzelnen Informationen zugreifen. Heute verwendet man Masken und AND bzw. OR

Soweit ich weiss (bin aber C-Laie), dürfte das heute in C auch noch gehen, das weiss ich aber nicht.

[3_of_8]

@mkinzler: Wenn ich mich nicht irre, können records seit D2006 auch Methoden besitzen.

Man könnte records entfernt mit Klassen vergleichen, jedoch müssen Klassen instantiiert und freigegeben werden, das heißt der Programmierer muss sich darum kümmern, dass der Konstruktor vor dem ersten Zugriff aufgerufen wurde und dass die Klasse auch wieder freigegeben wird.

Records hingegen werden von Delphi selbst verwaltet, auf die kann man also immer sofort zugreifen.

Records können auch sehr leicht abgespeichert oder in Strömen verschickt werden.

Sie können Methoden besitzen (ab D2006), aber verfügen IMHO nicht über Vererbung, Kapselung und das ganze Zeug drumherum.

[mkinzler]

Zitat:

@mkinzler: Wenn ich mich nicht irre, können records seit D2006 auch Methoden besitzen.

Du meinst class operators, daß sind aber imho keine richtigen Methoden und machen aus einem Record keine Klasse.

[Khabarakh]

@3von8: Schön, den wichtigsten Unterschied hast du vergessen .
Records sind Wertetypen, Klassen Referenztypen. Das ist der einzige Grund, warum Records noch nicht veraltet sind. In den übrigen Unterschieden gleichen sich beide Typen langsam aneinander an - natürlich beide in Richtung OOP: Records/Structs/... bekommen Methoden, Properties, Events und Konstruktoren, sogar ein wenig Vererbung durch Interfaces, Klassen werden genauso einfach verwaltbar wie Records.

@mkinzler: Nein, meint er nicht .

[Cöster]

Zitat von Die Delphi-Hilfe:

Zusätzlich zu den traditionellen Record-Typen lässt die Delphi-Sprache komplexere und “klassenähnliche” Record-Typen zu. Zu den Feldern können Records Eigenschaften und Methoden (einschließlich Konstruktoren), Klasseneigenschaften, Klassenmethoden, Klassenfelder und verschachtelte Typen haben. Weitere Informationen hierzu finden Sie in der Dokumentation zu Klassen und Objekten. Im Folgenden finden Sie eine Beispiel-Record-Typdefinition mit einigen “klassenähnlichen” Merkmalen.

Delphi-Quellcode:

type
  TMyRecord = record
    type
      TInnerColorType = Integer;
    var
      Red: Integer;
    class var
      Blue: Integer;
    procedure printRed();
    constructor Create(val: Integer);
    property RedProperty: TInnerColorType read Red write Red;
    class property BlueProp: TInnerColorType read Blue write Blue;
end;

constructor TMyRecord.Create(val: Integer);
begin
  Red := val;
end;

procedure TMyRecord.printRed;
begin
  writeln('Red: ', Red);
end;

Obwohl Records nun einige der Merkmale von Klassen besitzen, gibt es wichtige Unterschiede zwischen Klassen und Records.

• Records unterstützen keine Vererbung.
• Records können variante Teile enthalten; Klassen nicht.
• Records sind Wertetypen, daher werden Sie bei der Zuweisung kopiert, per Wert übergeben und dem Stack zugewiesen, wenn sie nicht als global definiert sind oder explizit mit den Funktionen New und Dispose zugewiesen werden. Klassen sind Referenztypen, daher werden Sie bei der Zuweisung nicht kopiert, per Referenz übergeben und dem Heap zugewiesen.
• Records ermöglichen das Überladen von Operatoren auf Win32- und .NET-Plattformen; Klassen ermöglichen das Überladen von Operatoren nur bei .NET.
• Records werden automatisch mit einem Standardkonstruktor ohne Argumente erzeugt, Klassen dagegen müssen explizit erzeugt werden. Weil Records einen argumentlosen Standardkonstruktor haben, muss jeder benutzerdefinierte Record-Konstruktor ein oder mehr Parameter haben.
• Record-Typen können keine Destruktoren haben.
• Virtuelle Methoden (die mit den Schlüsselwörtern virtual, dynamic und message angegeben werden) dürfen in Record-Typen nicht verwendet werden.
• Im Gegensatz zu Klassen können Record-Typen auf der Win32-Plattform keine Schnittstellen implementieren; auf der .NET-Plattform können Records jedoch Schnittstellen implementieren.