Inkompatible Typen: Eigener Typ und TStringDynArray

[wonkos]

Hallo allerseits!

Da ich zwar mit Programmierung einige Erfahrung habe (C#), aber noch neu im Umgang mit Delphi bin, bitte ich Euch hier um Unterstützung: Ich habe ein kleines Testprogramm erstellt, welches aus einer Textdatei zeilenweise lesen und den Inhalt zeilenweise auf der Konsole ausgeben soll. Allerdings bekomme ich beim Übersetzen vom Compiler die Fehlermeldung "Inkompatible Typen: 'TList' und 'TStringDynArray' in der Zeile, wo die SplitString-Funktion aufgerufen wird. Meiner Ansicht nach sollten die Typen kompatibel sein.

Habe ich den Typ TList falsch festgelegt? Wenn nein, wo sitzt hier der Fehler?

Schöne Grüße,

wonkos

Delphi-Quellcode:

type TList = Array of String;

var Dateiname     : String;
    Datei         : String;
    i             : Integer;
    List          : TList;
    Reader        : TStreamReader;

begin
  try
    { TODO -oUser -cConsole Main : Code hier einfügen }

  Datei:= '';
  Dateiname:= 'MeineTextdatei.txt';

  Reader:= TStreamReader.Create(
            TFileStream.Create(Dateiname, fmOpenRead),
            TEncoding.UTF8);

  while not Reader.EndOfStream do
    begin
       Datei := Datei + Reader.ReadLine();
    end;

    Reader.Close();
    Reader.BaseStream.Free();
    Reader.Free();

    List := SplitString(Datei, '#10#13');

    for i := 0 to High(List) do
    begin
      WriteLn (List[i]);
    end;

    ReadLn;
end.

[mkinzler]

1. Verwende besser einen anderen Namen für Deinen Typ (Tlist gibt es schon).

2. Delphi erkennt nicht was wirklich hinter einem Typ steckt

Delphi-Quellcode:

type 
  TA: Array Of String;
  TB: Array of String;

TA ist zu TB nicht kompatibel, obwohl es das Selbe ist.

[Uwe Raabe]

Im Gegensatz zu C-artigen Sprachen ist Delphi bei der Kompatibilität von Typen sehr restriktiv.

Delphi-Quellcode:

type
  TList1 = array of string;
  TList2 = array of string;

Hier sind TList1 und TList2 unterschiedliche Typen und nicht zuweisungskompatibel.

So würde es allerdings gehen:

Delphi-Quellcode:

type
  TList1 = TStringDynArray;
  TList2 = TStringDynArray;

[Der schöne Günther]

Wobei ich nicht verstehe, warum man heute noch System.Types.TStringDynArray benutzen sollte. Warum nicht einfach TArray<String> ? Ist doch genauso zuweisungskompatibel.

[mkinzler]

Nein, aber es wird u.U. eine überladenen Version verwendet.

[Stevie]

Der ganze Code ist eigentlich Unfug (erst zeilenweise nen string zusammentackern - hurrah Speicherreallokation und ihn dann wieder mit SplitString in nen Array aufteilen - hurrah doppelter Speicherverbrauch). TStringList und LoadFromFile ist wohl die bessere Lösung.

[Der schöne Günther]

Das geht, wenn jemand grade mit Delphi anfängt, sicher auch etwas freundlicher. Nicht umsonst ist die Delphi-Praxis als Gentlemens' Corners Club des Internets bekannt.

[himitsu]

Typen müssen nunmal "identisch" sein und nicht nur "gleich".
Und du hast hier eben nur "ähnliche" Typen neu deklariert.

Einzige Ausnahmen sind die Typen, wo es Konvertierungsfunktionen gibt, wie z.B. bei Byte<->Integer oder AnsiString<->WideString.


Provat ist es da besser TArray<DerTyp> zu verwenden, da hier die Generigs den "ähnlichen" Typen wiederverwenden/kombinieren und am Ende diese Typen dann identisch sind.

Leider hat es Emba immernoch nicht geschasst ihre eigenen Typen mal kompatibel zu machen.
Oder warum sind die TXyzDynArray in Types immernoch als array of Xyz; deklariert?

Zitat:

Der ganze Code ist eigentlich Unfug

Jupp.

Sicher, daß er überhaupt funktioniert?

Du liest die Datei Zeilenweise aus. ReadLine gibt aber nur den Zeileninhalt ohne den Zeilenumbruch zurück.
Das wird dann wieder zusammengesetzt, natürlich ohne die Zeilenumbrüche wieder einzufügen.
Und dann versucht man das per SplittString wieder zu trennen, was aber nicht geht, da die Zeilenumbrüche nicht mehr vorhanden sind.
Außerdem hat da jemand den zweiten Parameter bei SplittString falsch verstanden. Ich rate dringend nochmal zu einem Studium der OH.

PS: TFile.ReadAllLines, TFile.ReadAllText, TStringList, usw.

[Stevie]

Zitat von Der schöne Günther:

Das geht, wenn jemand grade mit Delphi anfängt, sicher auch etwas freundlicher. Nicht umsonst ist die Delphi-Praxis als Gentlemens' Corners Club des Internets bekannt.

Ich weiß nicht, wo das unfreundlich war - ist Unfug nun ein unter Strafe gesetztes Schimpfwort?
Und außerdem schrieb er, dass er bereits Erfahrung mit Programmierung in C# hat.
Demnach darf ich annehmen, dass er zumindest schonmal eine Textdatei eingelesen und ausgegeben hat.

Außerdem ist er bestimmt schon groß und kann sich selbst verteidigen, sollte ich ihm zu nahe getreten sein

[Der schöne Günther]

Ich hatte wohl grade meine Internet White Knight-Phase...