TStringList EIntrag anhängen?

[aaaaaaaaaa_10]

Hallo,

ich habe eine TStringList A und habe mit A.Add('irgend') eine Zeile eingefügt. Verwende ich jetzt nocheinmal A.Add wird ja der String in die nächste Zeile geschrieben. Gibt es auch die Möglichkeit noch etwas an die erste Zeile anzuhängen?

[Luckie]

Delphi-Quellcode:

var
  sl: TStringList;
  s: String;
begin
  sl := TStringList.Create;
  s := sl[5] + 'Neuer Text';
  sl[5] := s;
end

Ohne Gewähr.

[aaaaaaaaaa_10]

Habs so ähnlich probiert :

Delphi-Quellcode:

var 
  sl: TStringList; 
  s: String; 
begin 
  sl := TStringList.Create; 
  s := 'Neuer Text'
  s1 := sl[0] + s; 
end

Allerdings ist das Problem, dass das alle 3 Sek geprüft wird und somit die Zeile immer wieder angehängt wird. (Also immer länger wird)

[DeddyH]

Das ist doch genau das, was Du wolltest. Erläutere mal genauer, was Du vorhast und was das Problem ist.

[aaaaaaaaaa_10]

Mir fehlte im Prinzip jetzt die einmalige Abfrage, ob es weitere Strings gibt, bei Erstellung der StringList.
Hab es jetzt aber denke ich hinbekommen.

Delphi-Quellcode:

var 
  sl: TStringList; 
  s: String; 
begin
   s1.Add('schon da');
   if {irgendwas} then s := s+'neuer String';
   s1[0] := ('schon da'+#9+'neuer String');
end;

Der vorherige Code hat ständig getestet und alle 3 sekunden dasselbe hinten anghängt.

[Blup]

Delphi-Quellcode:

sl.Insert(0, 'neuer String');

[Micha88]

Nur aus Neugierde.

Warum nimmt man

Delphi-Quellcode:

sl[0] := 'Neuer Text';

wenn auch

Delphi-Quellcode:

sl.Insert(0, 'Neuer Text');

geht? Gibt es da einen bestimmten Grund, oder ist es egal was man nimmt?

[FaTaLGuiLLoTiNe]

Insert fügt an der angegebenen Stelle einen neuen String ein, die Zuweisung über den Index ersetzt den String an der angegebenen Stelle.