|
(Moderator)
Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.861 Beiträge
Delphi 11 Alexandria
|
Re: Text (ASCII) Datei
5. Jan 2006, 13:08
Ersetze die Zeile sl2.DelimitedText := '';
durch sl2.DelimitedText := ';;;;;;';
oder
benzutze sl2.Add( sl1.ValueFromIndex[2]);
usw.
Problem liegt daran das durch das Setzen das Textes auf '' die Anzahl der Einträge der Stringliste auf 0 gesetzt wird.
Markus Kinzler
|