Überprüfen ob TStringlist leer ist

[DeddyH]

Zitat von Hawkeye219:

Zitat von DeddyH:

Mit fällt auf, dass x nur dann erzeugt wird, wenn z true ist.

...und z durchaus einen Zufallswert enthalten kann.

Stimmt. Statt

Delphi-Quellcode:

if ini.SectionExists(leftstr(datetostr(datum),2)) then
  z:=true;

sollte man besser schreibenz := ini.SectionExists(leftstr(datetostr(datum),2));