Leere Zeilen beim Einlesen überspringen

[himitsu]

Delphi-Quellcode:

if Trim(Zeile) <> '' then 
  ListBox1.Items.Add(...);

Wirklich nicht so?

Warum eigentlich Repeat-Until und nicht While-Do?
Ist die Datei leer, dann gibt es keine Zeile, die man auslesen kann, also vorher prüfen.