memo duch ein array füllen klappt net........

[tHeRiAn]

Hallo erst mal,

denke mal wieder ein kleines Prob für euch...aber da ich net so fit in Sachen "array" bin.....

ich will zu erstellung einer form ein memo mit hife eines arrays füllen lassen....ich weiss es gibt auch viel andere Lösungen....hab ich auch schon alles ausprobiert, aber jetzt will ich auch noch die Variante mit nem array lösen....
Soweit kommt auch keine Fehlermeldung, doch das memo wird durch die schleife wohl net so ganz gefüllt :cry:

hier erst ma die deklaration des array

Delphi-Quellcode:

const aext:array[1..20] of string  = ('~*','bak','cfg','csm','dcu','ddp','dof','dsk','fts','gid','il*','kwf','map','md','obj','rsm','tds','tmp','~dfm','~pas');

und hier der Teil der fürs füllen des memos tätig ist

Delphi-Quellcode:

if not reg.KeyExists('\Software\XXXXXXXX Service GmbH\ExtCleaner\1.0')
      then
        for loop :=0 to 19 do memEndungen.Lines.Strings[loop]:= aext[loop]

      else memEndungen.Text := reg.ReadString('memext');

ihr habt doch bestimmt schon wieder ne Lösung parat..... :-D
ich denk ma der Fehler liegt irgendwo bei "lines.strings".

mfg sven :dp:

[fkerber]

Hi!

Probier das mal:

Delphi-Quellcode:

  for loop:=1 to 20 do begin

  memo1.lines.Add(aext[loop]);

   end;

Wichtig ist, dass die Schleife bei 1 beginnt.


Ciao fkerber

[tHeRiAn]

@ fkerber: klappt wunderherrlich......könnt mir nur mal wieder in den a.... beissen, daß ich auf sowas leichtes net gekommen bin :wall: .....aber super, dankeschön!!!!

weiss zufällig noch einer wieso die erste Variante net funktioniert hat?

mfg sven