Galera, ta ae o código que estou usando:
procedure TForm1.Button1Click(Sender: TObject); var i : integer; begin listbox1.clear; randomize; for I := 0 to 9 do listbox1.Items.Add(inttostr(random(10))); end; E vou testar os códigos e as dicas que me passaram. E João Morais, eu intendi o que vc disse, o random pega numeros aleatóriamente, não quer dizer que ele não vá se repetir, isso intendi, mas qual a função então do randomize ??? Pelo que eu li por ae, seria para não deixar repetir os numeros, tipo de 0..9 ele usasse todos sem repetir. Abraço gente. Tiago de Assis Pimenta MSN: [EMAIL PROTECTED] Email: [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
