Zeilen einer Datei zählen

[p80286]

Wenn er Bauminas Vorschlag genutzt hat, dann ja.

@Nugi89

Delphi-Quellcode:

if FileExists(path) = true then
begin

ist nicht so gelungen,

Delphi-Quellcode:

if FileExists(path) then
  begin

ist voll und ganz ausreichend.

Gruß
K-H

[mkinzler]

Nicht nur weniger aufwendig uach weniger fehleranfällig, da True nicht immer gleich True ist.

(True ist nicht False; also <> 0)

[BadenPower]

Zitat von Nugi89:

Ist den mein Quellcode soweit korrekt?

Nein.

1. Die Stringliste wird nicht freigegeben.

2. Wenn Du "Exit" eingibst, dann prüft Dein Programm erst, ob es die Datei "Exit" gibt und gibt dann "Existiert nicht!" aus bevor es zum Programmende kommt, ausser es gibt eine Datei "Exit" dann erhälst Du die Zeilenanzahl vor dem Beenden des Programms.

[Nugi89]

Danke für die Hilfe
Hatte meine Fehler selber gefunden, hatte den Wald vor lauter Bäumen nicht gefunden

[Rollo62]

Du bist mein Held ...
Welche Fehler waren denn das ?

Rollo