"Datenbank" mit Listbox + Richedit

[HW764]

Wie macht man, dass wenn man links in einer Listbox die mehrere einträge
hat (zb. 1,2,3,4,) Wenn man auf 1 klickt ändert sich der Test von
Richedit1 auf "Du hast di Zahl 1 gewählt u.s.w? Es soll etwas wie eine Datenbank werden.
Ich meine es etwa so:

http://mitglied.lycos.de/halloween764/aaaa.jpg

Danke!

[phXql]

gib der listbox ein onClick-ereignis. List1.itemindex gibt an, welches item gewählt worden ist.

[HW764]

Ich chechs nicht so ganz kann mir jemand ein stückchen coden?

[fkerber]

Hi!

Delphi-Quellcode:

procedure TForm1.ListBox1Click(Sender: TObject);
begin
case Listbox1.ItemIndex of
  0: begin Memo1.Text:='1'; end;
  1: begin Memo1.Text:='2'; end;
  end;
end;

Ciao fkerber