- 最後登錄
- 2024-4-8
- 在線時間
- 66 小時
- 註冊時間
- 2006-12-10
- 閱讀權限
- 20
- 精華
- 0
- UID
- 530435
- 帖子
- 177
- 積分
- 487 點
- 潛水值
- 19323 米
| 成為伊莉的版主,你將獲得更高級和無限的權限。把你感興趣的版面一步步地發展和豐盛,那種滿足感等著你來嚐嚐喔。 本帖最後由 vul3jo4 於 2009-11-10 01:51 AM 編輯
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int data[10];//多宣告一個陣列來紀錄
Memo1->Clear(); //清除memo1之內
Memo2->Clear();
randomize(); //啟動亂數函數
for(int i=0;i<10;i++) { // 設定10組數據 data = random(50);
int j=1 ;
while(j<i){
if(data==data[j]) {
data = random(50); //重新random
j = 1 ; //重頭開始比一次
}
}
Memo1->Lines->Add( IntToStr(data) ) ;}
TPoint Erasep[4];
}
大概就是這樣
另外還有一種方法 (懶的key上去了)
建立一個1~50 的 Array
random位置a跟b 兩位置
swap(位置a,位置b)
取array 前10個交換完畢的
這樣也可以產生出10個不會重復值
但會浪費 11~50 的 array 空間...
|
|