Forum: Object-Pascal / Delphi-Language
Delphi
by Gelmo,
12. Feb 2022
Hallo zusammen!
Zuerst einmal vielen Dank für den Hinweis auf TStringList. Damit konnte ich sofort die gewünschte Anzahl der Elemente, im dargestellten Fall also die Zahl der gespeicherten Textzeilen, ermitteln.
Die Vorteile von TStringList gegenüber dem Speichern von Textdateien Zeile für Zeile leuchten mir sofort ein. Ich habe tatsächlich mal mit Turbo-Pascal an einer Volkshochschule...
Forum: Object-Pascal / Delphi-Language
Delphi
by Gelmo,
10. Feb 2022
Der Code funktioniert ohne Fehlermeldung, liefert aber ein falsches Ergebnis. Wenn ich AktDatei durch sf ersetze, erscheint die Fehlermeldung "Inkompatible Typen".
Ich werde mal die Lösung mit Stringlist versuchen; dann kann ich aber zahlreiche Dateien nicht einfach weiter verwenden.
Einfacher wäre es für mich jetzt, die Anzahl der Elemente einer Textdatei im Voraus feststellen zu können....
Forum: Object-Pascal / Delphi-Language
Delphi
by Gelmo,
10. Feb 2022
Nun, die einzelnen Strings werden mittels writln in eine Textdatei geschrieben.
...
var
sf : Textfile;
...
Assignfile(sf,AktDatei);
for ui:=1 to 81 do writln(Feldinhalt);
closefile(f);
Forum: Object-Pascal / Delphi-Language
Delphi
by Gelmo,
10. Feb 2022
Hallo zusammen!
Ich möchte feststellen, wieviele Elemente sich in einer Textdatei befinden.
Dazu habe ich durch einen Link in diesem Forum eine Formel gefunden, die ich für meine Zwecke so umformuliert habe:
var
SZF_Elemente : Byte;
AktDatei : String;
...
AktDatei:=OpenDialog1.Filename;
...