Selektierten String aus Listbox an Label übergeben?

[mlspider]

Hallo,

wie könnte eine Übergabe eines selektierten String aus einer Listbox an ein Label aussehen?

Delphi-Quellcode:

if ListBox1.ItemIndex <> -1 then
  begin
    Label13.Caption:=ListBox1.Items.Strings[Listbox1.ItemIndex];
 end;

Funktioniert zwar, aber der erste Eintrag wird ignoriert.

Danke