Fórum Ordenação de nºs inteiros dentro de listbox! Ajudem!! #164353

Olá galera, venho a algum tempo visitando o site e curto muito, mas agora me apareceu um problema em Delphi para resolver e não consigo!
Eh muito simples, tenho um Edit aonde adiciono numeros inteiros que descem para um listbox ao clicar no Button Adicionar, posso colocar qts quiser, ao lado do 1º listbox existe outro listbox que, ao clicar em outro Button chamado Ordenar, ele recebe os nºs que estavam no 1º listbox só que ordenados crescentemente! Alguém poderia me ajudar neste código por favor??

Agradeço desde já a atenção! :P