ListBox-Problem

[Daniel B.]

hallöchen..

ich bin anfänger und habe ein problem.. ich möchte das wenn ich auf einem button clicke, das dann was ich in einem edit eingebe, in einer listbox eintrage.. es funktioniert ja schon.. nur wenn ich einen zweiten eintrag habe, dann wird immer nur der 1. eintrag überschrieben.. die einträge sollen einfach nur zusätzlich in die liste eingetragen werden können.. vielen dank im vorraus..

mfg daniel

[Jens Schumann]

Hallo Daniel,<br>
probire mal im OnClick-Event des Buttons folgendes:<br>
...<br>
ListBox1.Items.Add(edit1.Text);<br>
...<br>
<br>
Jens Schumann<br&gt

[Daniel B.]

hallöchen..

so habe ich es geschrieben..

procedure TForm1.ButtonKarteikarteFunktionenOKClick(Sender: TObject);

//Einträge in die Liste übernehmen; Karteikarte Funktionen

var

StringlisteFunktionen: TStringList;

begin

StringlisteFunktionen := TStringList.Create;
StringlisteFunktionen.Add(EditKarteikarteFunktione nID.Text);
ListBoxKarteikarteFunktionen.Items := StringlisteFunktionen;
StringlisteFunktionen.Free; //Speicher freigeben

end;

der OnClick-Event des Buttons heisst: ButtonKarteikarteFunktionenOKClick..

leider bin ich noch nicht weitergekommen.. aber trotzdem bin ich nicht weitergekommen.. denn es scheinnt im prinzip richtig zu sein.. oder ich verstehe es nicht.. trotzdem vielen dank..

mfg daniel :

[Daniel B.]

hallöchen..

so habe ich es geschrieben..

procedure TForm1.ButtonKarteikarteFunktionenOKClick(Sender: TObject);

//Einträge in die Liste übernehmen; Karteikarte Funktionen

var

StringlisteFunktionen: TStringList;

begin

StringlisteFunktionen := TStringList.Create;

StringlisteFunktionen.Add(EditKarteikarteFunktione nID.Text);

ListBoxKarteikarteFunktionen.Items := StringlisteFunktionen;

StringlisteFunktionen.Free; //Speicher freigeben

end;

der OnClick-Event des Buttons heisst: ButtonKarteikarteFunktionenOKClick..

es scheint im prinzip richtig zu sein.. oder ich verstehe es wirklich nicht.. trotzdem vielen dank..

mfg daniel :

[Uli Becker]

Hallo Daniel,

du bringst da einiges durcheinander:

1. Listbox.items beinhaltet bereits TStrings, es ist also überflüssig, eine zusätzliche StringList zu verwenden.

2. Wenn du schreibst: listbox.items := stringlist, ersetzt du damit alle Einträge in der Listbox durch die Einträge in der Stringlist. Da du aber die Stringlist jedesmal neu erstellst, gibt es auch immer nur einen Eintrag.

3. Mache es doch einfach so, wie Jens Schumann es beschrieben hat: Jeder Click fügt den neu erstellten Eintrag der Listbox hinzu.

Gruß Ul

[Daniel B.]

jetzt verstanden.. es klappt.. vielen, vielen dank.