Hmm..
dann aber auch gleich statt
Delphi-Quellcode:
for I := 39 to 78 do begin
s := server.Strings[i]; //Datum zB: 17.03.2017 aus der textdatei
if not isdate(s) then begin
if server.Strings[i]='Nothing'=false then cat1.add(server.Strings[i]);
end;
end;
das 2. =false auch entfernen
Delphi-Quellcode:
for I := 39 to 78 do begin
s := server.Strings[i]; //Datum zB: 17.03.2017 aus der textdatei
if not isdate(s) then begin
if not(server.Strings[i]='Nothing') then cat1.add(server.Strings[i]);
end;
end;