Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   T-Array einer Funktion mit TArray<string>-Parameter übergeben (https://www.delphipraxis.net/198066-t-array-einer-funktion-mit-tarray-string-parameter-uebergeben.html)

DieDolly 1. Okt 2018 20:06


T-Array einer Funktion mit TArray<string>-Parameter übergeben
 
Ich habe eine Funktion die ein TArray<string> entgegennimmt
Delphi-Quellcode:
Implode(const Delimiter: string; const Values: TArray<string>): string;
In einer anderen Funktion würde ich der o.g. Funktion gerne T übergeben
Delphi-Quellcode:
procedure WriteArray<T>(const Section: string; const Ident: string; Delimiter: string; Value: T);
begin
 if (TypeInfo(T) = TypeInfo(string)) then
  WriteString(Section, Ident, Implode(Delimiter, TArray<string>(Value)))
 else if (TypeInfo(T) = TypeInfo(Integer)) then
  WriteString(Section, Ident, Implode(Delimiter, TArray<Integer>(Value)));
WriteArray rufe ich so auf
Delphi-Quellcode:
WriteArray<string>('section', 'ident', mein-array);
Wie schaffe ich es, Implode das zu übergeben, was es haben möchte?
T kann Integer oder String sein.
Ich könnte Implide ja auch generisch machen. Aber dann würde der Code in Implode nicht mehr funktionieren eben wegen desselben Problems wie oben
Delphi-Quellcode:
Result := string.Join(Delimiter, Values);
Ich glaube ich habs. Statt T muss für Value TArray<T> im Kopf deklariert sein.

Dennis07 6. Okt 2018 17:01

AW: T-Array einer Funktion mit TArray<string>-Parameter übergeben
 
Also zunächst einmal, kannst du generische Parameter nicht auf einfache Typen beschränken. Eines der Nachteile in Delphi bei den Generics ist die schlechte Definierbarkeit von constraints bei nicht-Klassentypen, die es (bis auf Records) quasi nicht gibt.
Zweitens kannst du Typenparameter nur für Membermethoden deklarieren, nicht aber für globale Funktionen/Prozeduren.
Delphi-Quellcode:
WriteArray<T>
geht also nicht, du musst bspw.
Delphi-Quellcode:
TArray.Write<T>
verwenden.
Und drittens, ist das, was du machen willst, nicht möglich. Das ginge nur über den Umweg mit
Delphi-Quellcode:
array of const
, indem du das (offene) String-Array in ein offenes untypisiertes Array konvertierst.

DieDolly 6. Okt 2018 17:42

AW: T-Array einer Funktion mit TArray<string>-Parameter übergeben
 
Ich habe es gerade noch einmal getestet. Funktioniert einwandfrei.
Lesen, modifizieren, schreiben.

Dennis07 9. Okt 2018 02:55

AW: T-Array einer Funktion mit TArray<string>-Parameter übergeben
 
Naja, also exakt so, wie von dir beschrieben, wird es sicher nicht funktioniert haben. Wenn du aber etwas "ähnliches" verwendest, dann eventuell schon.

DieDolly 9. Okt 2018 08:53

AW: T-Array einer Funktion mit TArray<string>-Parameter übergeben
 
Probier es aus. Es funktioniert.
Oben im Aufruf steht nur nicht der Parameter Delimiter drin aber das ist ein Kopierfehler.
Vom eigentlichen Code her funktioniert es wunderbar.


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:03 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz