Delphi Forum

void __fastcall TForm1::Button1Click(TObject *Sender)
{

for(i=0;i<5;i++){
dizi =random(10);
for(j=0;j<5;j++){

if(dizi[j]==dizi )
dizi =random(10);



}

}

for(m=0;m<6;m++){
ListBox1->Items->Add(dizi[m]);
}
}

bunun neresi yanlış ya yine aynı sayıyı uretiyor..........
Amacım birbirinden farklı 5 ...

c++ ağ icindeki acık pcleri ping ile bulmak istiryorum ama komutları bilyorum bu kondaya banayardımcıolacak arkdaşlar varmı