Delphi-Quellcode:
for i := 0 to MAnfangsDatum.Lines.Count-1 do
if List[i] <> '' then
List.Add(MAnfangsDatum.Lines[i]);
Dir ist schon klar, daß Du Dich da auf ganz dünnem Eis bewegst?
i wird durch
MAnfangsDatum.Lines.Count bestimmt und it i greifst Du auf
List zu. Das kann ganz schnell zu unerwünschten Reaktionen führen.
gruß
K-H