ValueListEditor

[Delphi.Narium]

Wieviele Zeilen hat das Memo denn?

Genausoviel wie Aktienname? Wo wird das sichergestellt?

Was sagt denn ShowMessage(Memo1.Lines.Count) ? Zufällig 2?

Wie wäre es denn mit

Delphi-Quellcode:

     (* PickListe --> Memo1 *)
procedure TForm1.BitBtn10Click(Sender: TObject);
Var Laenge, i : Integer;
begin
  Memo1.Lines.Clear;
  Laenge := AktienName.Count;
  ShowMessage(IntToStr(Laenge)); // Laenge ist OK
  for i := 0 to (Laenge - 1) do
  begin
    ShowMessage(AktienName[i]); // hier OK !! es kommen alle 7 Aktienklarnamen
    Memo1.Line.Add(AktienName[i]); // Hier werden nun alle Aktienklarnamen ans Memo angehängt.
  end;
end;