Array of String als Konstante klappt nicht...

[ToFaceTeKilla]

Zitat von himitsu:

Das Einzige was möglich ist, ware eine dynamische Array-Variable nachträglich mit dem Inhalt einer statischen Array-Konstante zu belegen.

Da ich das gerade brauche: gibt es da einer Möglichkeit, das in einem Rutsch zu erledigen ála:
dynarray:= staticArray;
(Dass dieser Weg nicht geht, hab ich schon gemerkt
Ansonsten muss ich das statischen eben durchlaufen.

[jfheins]

Geht copy() nicht?

[ToFaceTeKilla]

Ne leider nicht. Mit Copy() kann man nur von dynamischen Arrays kopieren, nicht aber auf

[himitsu]

Weil ich's grade sehe.

Gab es nicht irgendwo einen Array-Helper (paar mal gesehn, aber immer wenn ich es suche, dann finde ich nichts ),
der ein OpenArray (array of T) als Parameter entgegen nimmt und ein dynmaisches TArray<T> zurück gibt?
Bei OpenArrays kann man alle Array-Typen reingeben und der Compiler kopiert notfalls automatisch um.

Drinnen in dem Helper wäre dann aber auch wieder nur der StandardCode:
* SetLength und dann umkopieren der Items

[Dennis07]

Zitat von himitsu:

Gab es nicht irgendwo einen Array-Helper (paar mal gesehn, aber immer wenn ich es suche, dann finde ich nichts ),
der ein OpenArray (array of T) als Parameter entgegen nimmt und ein dynmaisches TArray<T> zurück gibt?
Bei OpenArrays kann man alle Array-Typen reingeben und der Compiler kopiert notfalls automatisch um.

Drinnen in dem Helper wäre dann aber auch wieder nur der StandardCode:
* SetLength und dann umkopieren der Items

Öff... nicht dass ich wüsste. Dürfte aber kein Hexenwerk sein...

Bezüglich array of const gibt es meines Wissens nach auch keine vorgefertigte Lösung, aber auch das lässt sich relativ einfach realisieren. (function (A: array of const): TArray<TVarRec> begin Pointer(Result) := Pointer(A); end )

Bei Strings ginge ja sowas wie String.Join(',', MyArrayOfConst).Split(',') , und bei anderen Typen muss man halt immer vorsichtig sein, da sie ja nicht alle Typen eines TVarRec-Objekts darstellen können. Andersherum wäre das ja, wie du sagst, eh implizit möglich.

[himitsu]

Zitat von Dennis07:

Bezüglich array of const gibt es meines Wissens nach auch keine vorgefertigte Lösung, aber auch das lässt sich relativ einfach realisieren. (function (A: array of const): TArray<TVarRec> begin Pointer(Result) := Pointer(A); end )

NEIN, denn array of const ist nicht gleich array of const !

Als Parameter sind array of-Definitionen ein eigener Typ/Mechianismus, der intern auch komplett anders arbeitet und aufgebaut ist.
http://docwiki.embarcadero.com/RADSt...en/Open_Arrays

[Dennis07]

Was du wohl eigentlich sagen wolltest:

Zitat:

array of const ist nicht gleich TArray<TVarRec>

.
Und ja, da hast du natürlich recht. Zumindest so teilweise.

Nur habe ich deshalb nicht Unrecht. Schauen wir es uns etwas genauer an:
Ein array of const wird vom Compiler wie ein statisches Array behandelt, obwohl es intern ein PVarRec ist. Deshalb brauchen wir einen @ -Operator vor dem array (welchen ich gestern nicht geschrieben habe, weil ich gerade keinen Bock hatte, den Code zu testen und so nicht gemerkt habe, dass er eben nur fast richtig ist).

Somit wird folgende Funktion eben funktionieren:

Delphi-Quellcode:

function ArrayOfConstToArrayOfTVarRec(a: array of const): TArray<TVarRec>;
begin
  Pointer(Result) := Pointer(@a);
end;

etwas typsicherer wäre es dann aber doch, nicht beides nach Pointer zu casten, sondern das Rechte nach TArray<TVarRec> . Dann sieht das ganze so aus:

Delphi-Quellcode:

function ArrayOfConstToArrayOfTVarRec(a: array of const): TArray<TVarRec>;
begin
  Result := TArray<TVarRec>(@a);
end;

Kannst du ja gern testen, wenn du es mir nicht glaubst. Aber es funktioniert.

Showmessage(String(ArrayOfConstToArrayOfTVarRec(['hello'])[0].VUnicodeString)); // Zeigt "hello"