Autor Beitrag
Vito
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Do 21.08.03 07:21 
Hallo, alle zusammen!

Ich habe ListBox1 und ListBox2. Jetzt möchte ich das in ListBox1 nur Einträge zugelassen werden, die in ListBox2 vorgegeben sind.

Beisp.

ListBox2

Haus
Garten
Auto

Wenn jetzt in ListBox1 etwas anderes auftaucht soll es einfach gelöscht werden(garnicht erst zugelassen werden).

Ich hoffe ich habe mich verständlich gemacht
und mir kann jemand helfen.

thx

im voraus

Vito

Moderiert von user profile iconTino: Titel geändert & Topic verschoben.
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Do 21.08.03 07:36 
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
procedure TForm1.Button1Click(Sender: TObject);
begin
  if ListBox2.Items.IndexOf(Edit1.Text) > -1 then
    Listbox1.Items.Add(Edit1.Text);
end;
Vito Threadstarter
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Do 21.08.03 07:45 
Titel: ListBoxen
Danke für die rasante Antwort

klappt super

mfg

Vito
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Do 21.08.03 07:50 
Ist allerding case-sensitiv.
Vito Threadstarter
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Do 21.08.03 08:18 
Titel: ListBoxen
Ist aber genau das was ich wollte
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Do 21.08.03 08:31 
Manchmal hat man eben Glück. :P