Dynamische Arrays in XE7

[Neutral General]

Vom Prinzip her kenn ich die Problematik/den Hindergrund im Zusammenhang mit Parametern.
Aber habe eben als ichs getestet habe nicht so weit gedacht.

[himitsu]

Delphi-Quellcode:

type
  //TIntegerDynArray = array of Integer;  // siehe Unit Types
  //TArray<T> = array of T;  // siehe Unit System

  A = TIntegerDynArray;  // Alias
  B = type TIntegerDynArray;  // neuer Type, aber kompatibel zu TIntegerDynArray
  C = array of Integer;  // eigener Typ
  D = TArray<Integer>;  // Alias

PS: siehe mein letztes PS


Ich frage mich nur, warum diese Tro... keiner auf die saudämliche Idee gekommen ist und die vordefinierten Typen der Types.pas oder des TBytes auf den generischen Typen umzustellen (als Alias).
Nur die von TidBytes waren so intelligent.

[kretabiker]

Zitat:

PS: Auch schon vor den Generics war das Problem bekannt, drum gibt es Typen ala TIntegerDynArray.

Sehr schön - und DAS sagt ihr mir erst jetzt?! Seit wievielen Jahren gibt es den Typ schon, verflixte Axt? Dann kann ich ja mal durch meine Sourcen sausen und meine geliebte Type-Definition TIntArray entfernen - lang lebe Suchen/Ersetzen...

Wie entdeckt ihr eigentlich solche Neuerungen immer? Und wieso ich nicht? *schmoll* (immerhin: die Existenz von Generics habe ich mitbekommen)

[Der schöne Günther]

Tu dir den Gefallen und nimm gleich TArray<Integer> und nicht TIntegerDynArray oder wie es heißt

[himitsu]

Zitat von Der schöne Günther:

Tu dir den Gefallen und nimm gleich TArray<Integer> und nicht TIntegerDynArray oder wie es heißt

Jupp, denn siehe #8.

Also das ist schon mindestens seit D7 dabei. (vielleicht hatte ich es auch schon in D4 benutzt)


Nja, aus diesem Grund würde ich mir leider nie die Starter-Editionen kaufen können, denn da schon die OH oft sehr leer ist, kann man nur intteressiert in die Quellcodes gucken.

[mm1256]

Hallo,

weil meine Frage zum Thema passt, fange ich mal keinen neuen Fred an.

Delphi-Quellcode:

type
  TIntegerRec = record
    i1 : integer;
    i2 : integer;
    s1 : string;
    s2 : string;
  end;
  TIntegerRecArray = array of TIntegerRec;

procedure TForm1.Button1Click(Sender: TObject);
var
  IRA : TIntegerRecArray;
  x: TIntegerRec;
  i: integer;
begin
  IRA := [];
  for i := 1 to 10 do begin
    x.i1 := i;
    x.i2 := i * 100;
    x.s1 := IntToStr(x.i1);
    x.s2 := IntToStr(x.i2);
    IRA := IRA + [x];
  end;
  Edit1.Text := '';
  for i := Low(IRA) to High(IRA) do begin
    x := IRA[i];
    Edit1.Text := Edit1.Text+x.s1+','+x.s2+' ';
  end;
  IRA := []; // muss das sein?
end;

Meine Frage ist, muss das Array geleert werden, um den Speicherplatz freizugeben? Wie verhält es sich, wenn IRA eine globale Variable wäre? Gibt dann die Application beim Beenden den Speicher frei?

[Der schöne Günther]

Wenn eine Applikation endet räumt das OS sowieso den von der Anwendung belegten Speicher ab. Arrays, Records, Interfaces und Strings werden gemanaged- Wenn sie nicht mehr genutzt werden, werden sie abgeräumt.

Wenn du beispielsweise in einer Klasse ein Array hast dass du nicht mehr brauchst wird das Array erst freigegeben wenn das Objekt auch abgeräumt wird. Es sei denn, du setzt es schon vorher, wenn du weißt dass du es nicht mehr brauchst, auf nil.

In deinem Beispiel: Nein, das muss nicht sein. Denn es ist eine lokale Variable die nur in deiner Methode bekannt ist. Endet die Methode, fällt der "Referenzzähler" des Arrays auf Null (niemand kennt das Array) und somit wird es freigegeben.

[Uwe Raabe]

Zitat von kretabiker:

Wie entdeckt ihr eigentlich solche Neuerungen immer?

Vergleich des Source-Folders mit dem der alten Version?