Initialisierung eines Record-Feldes

[s.h.a.r.k]

Hallo,

habe im Moment das Problem, dass ich ein Feld in einem Record habe, welches eigentlich initialisiert werden sollte.

Delphi-Quellcode:

TBlub = record
private
  FArray : PGenericArray; // Entweder das hier
  FBoolean : Boolean; // ... oder das hier

Hatte gerade einen constructor eingebaut, der aber nicht funktioniert hat, er wurde nicht mal angesprungen

Nun die Frage: wie kann ich eines der Felder denn initialisieren? Oder wird das Boolean-Feld schon automatisch initiailisiert? Habe auf die schnelle nicht gefunden.

-- EDIT: Vielleicht sollte ich noch dazu erwähnen, dass ich ein paar Operatoren überladen habe Ich weiß nicht, ob das hier evtl. eine Rolle spielt.

[himitsu]

Vote for Me => http://qc.embarcadero.com/wc/qcmain.aspx?d=82524

Nee, der Constructor ist leider aktuell kein "richtiger" Constructor.
Wie du bestimmt schon bemerkt hast, kann man keinen parameterlosesn Constructor erstellen ... rate mal, warum.


Antwort:
Beide Felder enthalten keine Typen mit automatischer Speicherverwaltung (wie z.B. bei String, dyn. Array oder Interface),
also werden keine deiner Felder automatisch initialisiert, sie werden auch nicht ordentlich umkopiert (z.B. bei a := b; ) und vorallem wird nichts davon automatisch freigegeben.

Willst du eine automatische Speicherwerwaltung, wirst du mindesens einen automatischen Typen verbauen und diesen als Initialisierungsmarker mißbrauche oder gleich alle Daten z.B. in einem String, dyn. Array oder Interface ablegen.

[s.h.a.r.k]

Und Felder werden scheinbar auch nicht initialisiert Echt super das ganze...

Wenn ich aber einen String anlegen würde, dann wäre er anfangs leer?

YEAHA Es geht! Danke dir, mein WE ist gerettet!!! Jetzt steht meinem Array-Record eigentlich nichts mehr im Wege. Die Tests sind auch alles okay... Geil

[himitsu]

Ja.

Aus diesem Grund hab ich hier mehrere Werte/Felder in soeinem automatischem Typ versteckt und die Initialisierung des Encoding wird ebenfalls über diesen automatischen Typen abgeglichen/überprüft.
http://www.delphipraxis.net/144528-s...iccharset.html

PS: Nur die String besitzen eine "ordentliche" Referenzzählung, mit automatischer Überprüfung einer Single-Instance.

Nomale dyn. Arrays verfügen nicht über sowas, was bei der Kapselung in einem Record zu problem führen kann.

Delphi-Quellcode:

var a, b: array of integer;
SetLength(a, 1);
a[0] := 1;
b := a;
b[0] := 2;
if a[0] = 1 then ShowMessage('heul');

[s.h.a.r.k]

Daher musste ich die letzten Tage meine Copy-Methode noch anpassen. Ein einfach Move() hat es in Fällen von z.B. den Strings eben nicht mehr getan.

[Progman]

wie wäre es denn mit:

Delphi-Quellcode:

TBlub = record
private
  FArray : PGenericArray; // Entweder das hier
  FBoolean : Boolean; // ... oder das hier
public
  procedure Init;
end;

procedure TBlub.Init;
begin
  //alle Defaultwerte setzen
end;

var Blub: TBlub;

//an passender Stelle einfach
Blub.Init;

Bei D2007 geht das so.