Stringlisten aneinanderhängen

[LoL]

hi

kann man zu einer Stringliste(TStringlist) einfachh den inhalt einer anderen anhängen ohne das über eine schleife zu machen?

stringlist1 := stringlist1 + stringlist2;

[Ultimator]

Probier's aus? :roll:
Warum willst du denn keine Schleife nehmen?

[Nightshade]

Delphi-Quellcode:

Stringlist1.AddStrings(StringList2);

[Dax]

Dafür gibt es eine spezielle Methode TStrings.AddStrings. Dieser Methode übergibst du nur deine andere Stringlist und sie wird zum Aufrufer hinzugefügt.

[Steve]

AddStrings
Mehr sag ich dazu nich :mrgreen:

Gruß
Stephan :dance:

:shock: bin ich lahm

[LoL]

tut mir leid das es soeinfach war :wall:

ist aber komisch genau das hab ich eben probiert und delphi hat gemeckert.
jetzt hab ich mal neugestartet und dann gings...

THX

[LoL]

gleich die nächste frage:

ich hab ne procedure schaut so aus:

Delphi-Quellcode:

procedure Draw(sl : TStringlist);

in meinem programm hab ich dann 2 listen die ich aneinandergehängt übergeben will:

Draw(sl1 + sl2);

brauch ich dazu noch ne variable oder kann ich das irgendwie so machen?

[Steve]

Delphi-Quellcode:

sl1.addStrings(sl2);
draw(sl1);

...oder 2 Parameter und innerhalb von Draw AddStrings aufrufen... :stupid:

Gruß
Stephan

[LoL]

ich will ja das das was in den listen steht auch so drin bleibt und nicht verändert wird!
bei strings ist das ja ganz einfach:

Delphi-Quellcode:

procedure bla(text : String);
...
s1,s2 : string;
begin
  bla(s1+s2);
end;

und so geht es nicht

Delphi-Quellcode:

Draw(sl1.addstrings(sl2));

[Error] main.pas(540): Incompatible types: 'TStringList' and 'procedure, untyped pointer or untyped parameter'

[Steve]

TStringList is ne Klasse und somit schonmal gar nicht vergleichbar mit dem Typen String :) (Siehe hierzu die Übersicht Typen der Hilfe) Dass Du SL.AddStrings() nicht als Parameter übergeben kannst ist klar, da ja ne TStringList erwartet wird, AddStrings ist aber ne Prozedur (Es ginge theoretisch wenn AddStrings ne Funktion mit einem Rückgabewert vom Typ TStringList wäre) Du hast nun die Möglichkeit, entweder zwei Parameter zu übergeben (PROCEDURE Draw(const SL1, SL2: TStringList) und intern AddStrings aufzurufen oder ne dritte Hilfesvariable dummySL einzuführen...


Gruß
Stephan :dance: