Como inserir uma Virgula(,) em todos os itens do ListBox

ListBox1.Items.Add(IntToStr(Variavelcontendoaquiloquedeseja + ´,´));