Código Delphi [-] dato := ListBox1.ListItems[ListBox1.ItemIndex].ItemData.Detail;
dato := ListBox1.ListItems[ListBox1.ItemIndex].ItemData.Detail;