Lokalen Record initialisieren

[Bjoerk]

Zitat von Uwe Raabe:

Aber so ginge es:

Delphi-Quellcode:

  TSomeRecord = record
    class function Create: TSomeRecord; static;
  end;

Fein. Kann in einem Record eine procedure auch Free heißen, dann hätte man das Gegenstück zum Pseudoconstructor und könnte mäglichen belegten Speicher (z.B. dyn. arrays freigeben)?

[himitsu]

Kein Problem.

Im Prinzip kann man auch noch
eventuell einen Destructor schreiben (nur ohne das override)
sowie einen class constructor und class destructor für seine class var's (entspricht dem initialization- und finalization-Abschnitten)

[Namenloser]

Zitat von Bjoerk:

Kann in einem Record eine procedure auch Free heißen, dann hätte man das Gegenstück zum Pseudoconstructor und könnte mäglichen belegten Speicher (z.B. dyn. arrays freigeben)?

Auch bei TObject ist Free eine normale Prozedur – der eigentliche Destructor heißt Destroy, aber auch das ginge beim Record. Die Freigabe von dynamischen Arrays macht Delphi aber sowieso automatisch am Ende des Scopes, dafür braucht man keinen Destructor.

Aufpassen muss man höchstens, wenn man mit Pointern auf Records hantiert, in dem Fall muss man u.U. manuell Finalize aufzurufen.

[Mikkey]

Zitat von Der schöne Günther:

Abgesehen davon, dass ZeroMemory eine Windows-Funktion ist, was sollte man eigentlich im Normalfall nehmen?

Selbst in C(++) kommt man nicht immer mit dem ZeroMemory (oder memset) aus. Wenn man die Kontrolle über die Definition hat, sollte man eine Record-Methode ("Init()", "Initialise()", "Reset()") schreiben, die die einzelnen Felder "wie es sich gehört" mit Standardwerten bestückt.

Den ZeroMemory habe ich bei solchen Records wie "LOGFONT" verwendet, weil darin halt gefühlte 100 nicht benötigte Einzelfelder vorkommen und (in C) das Ausnullen den gewünschten Effekt liefert.