Textdatei in Typisierte Datei "konvertieren"

[Mojito]

Hallo liebe Delphi Freunde,

die Arbeit mit Textdateien und typisierten Dateien macht mir zu schaffen. Ich versuche eine Textdatei aufzurufen und dann in eine typisierte Datei zu schreiben. Leider gibts da noch einige Bugs, so wird tempFile nicht als gültiger Dateityp angenommen und allgemein bin ich mir nicht sicher ob das alles so seine Richtigkeit hat.. Habt ihr Verbesserungsvorschläge? Bitte nicht köpfen

Delphi-Quellcode:

procedure Convert(fileName: string);
var
  x, y: Integer;
  tempFile: file of TextFile; // Liest Textdatei aus
  tempString: string;
  typedFile: array [0 .. 10] of TAdresse; // Array, der Zeileninhalte speichert
begin
  AssignFile(tempFile, fileName); // Öffnen Textfile, Speicher in Tempfile
  reset(tempFile);                // Lesen  Textfile
  x := 0;
  Seek(tempFile, 0);              // Startpunkt
  while not eof(tempFile) do      // Solange letzte Zeile nicht erreicht
  begin
    tempString := '';                     // Leerer String
    readln(tempFile, tempString);         // Lesen Aktueller Zeile
    typedFile[x] := strToTyped(tempString);   //Übergabe Zeile an Array, strToTyped konvertiert in string 
    inc(x);                       //Anzahl Zeilen;
  end;
  for y := 0 to x do
    writeln(Newfile, typedFile[y]); //Übergabe an Typisiertey Datei
end;