程式的目的是先做出一個5位數的亂數，再到資料庫找有沒有已重複的值，如果有重複，就再重新找一次
以下是我的code
[code cpp]
int T_ID = 0;
AnsiString XXX;
do
{
randomize();
int a[5]={0};
for(int i=0; i!=5; i)
a[i] = (rand());

for (int i=0; i!=5; i)
{
char c = (a[i] 48);
XXX[i 1] = c;
}
T_ID = XXX.ToInt();
}while( Table1->FindKey(ARRAYOFCONST((T_ID))) );
[/code]

如果間隔1~2秒呼叫這個函式，是正常的
不過再快一點就會卡在這個while迴圈(一直重複)，不知道要怎麼解這個問題咧…

請試:

static unsigned int seed = 2;

do
{
.....
for(int i=0; i!=5; i) {

srand (   seed );

a[i] = (rand());
}

..................


}while (.....)


我用想的，自己沒試。所以…

------


蕭沖
--All ideas are worthless unless implemented--

C++ Builder Delphi Taiwan G+ 社群
http://bit.ly/cbtaiwan

編輯記錄

randomize(); 只需執行一次即可，請把 randomize(); 拿出迴圈外就可正常 

另就以所提供的程式碼在 BCB6上執行時，跑到 XXX[i 1]=c 這邊時 會出現錯誤，
就邏輯來說，XXX 並未宣告字串，所以 XXX[?] 取陣列時就會產生錯誤，不知
GrandRURU 兄是用什麼程式編譯執行的 ?

===================引 用 GrandRURU 文 章===================
程式的目的是先做出一個5位數的亂數，再到資料庫找有沒有已重複的值，如果有重複，就再重新找一次
以下是我的code
[code cpp]
int T_ID = 0;
AnsiString XXX;
do
{
randomize();
int a[5]={0};
for(int i=0; i!=5; i)
a[i] = (rand());

for (int i=0; i!=5; i)
{
char c = (a[i] 48);
XXX[i 1] = c;
}
T_ID = XXX.ToInt();
}while( Table1->FindKey(ARRAYOFCONST((T_ID))) );
[/code]

如果間隔1~2秒呼叫這個函式，是正常的
不過再快一點就會卡在這個while迴圈(一直重複)，不知道要怎麼解這個問題咧…

------
無限的想像，無盡的延伸。

編輯記錄

謝謝aftcast大和ChungLin.Net大所提供的方法

To : ChungLin.Net大
我的原始code是用stringstream來存放值，因為要減少解答人的理解時間，用ansistring比較能很快表達我的意思。

再來，
在經過小弟的測試後發現，還是一樣，不行………
不論randomize();是在do前還是do內，都不行

P.S : randomize();初始是依系統時間，所以每次初始的值都會不一樣。但最後rand()的值卻都一樣，真想捏爆它。

不過後來看了static的方式，決定改用另一種方法試試，結果還真的ok耶！

以下是我的Code
[code cpp]
int T_ID = 0;
static int ixx=0;
AnsiString XXX="12345";
do
{
randomize();
int a[5]={0};
for(int i=0; i!=5; i)
a[i] = (rand());

for (int i=0; i!=5; i)
{
char c = (a[i] 48);
XXX[i 1] = c;
}
T_ID = XXX.ToInt();

if (ixx <= 10)
ixx;
else
{
ixx = 0;
T_ID = T_ID Rand().ToInt();
T_ID = StrToInt(FormatFloat("00000", T_ID));
}
}while( Table1->FindKey(ARRAYOFCONST((T_ID))) );
[/code]
反正最大不會超過「32767」(剛好5位數，不會超出資料庫界定的範圍)
就給它去了。

這樣還真的覺得很糟糕啊……

目前暫時先解決這個問題了，架構問題改天再說

aftcast大，我們鼓勵一下新人吧，分數就先給他囉 ^ ^

===================引 用 aftcast 文 章===================
請試:

static unsigned int seed = 2;

do
{
.....
for(inti=0;i!=5; i){

srand (   seed );

a[i]=(rand());
}

..................


}while (.....)


我用想的，自己沒試。所以…

編輯記錄

相關的討論和與章還不少，可參考
http://www.programmer-club.com/ShowSameTitleN/c/38415.html
或是
[BCB] 高效率的產生不重複亂數 隨機數- 洗牌演算法


===================引 用 GrandRURU 文 章===================
程式的目的是先做出一個5位數的亂數，再到資料庫找有沒有已重複的值，如果有重複，就再重新找一次
以下是我的code
[code cpp]
int T_ID = 0;
AnsiString XXX;
do
{
randomize();
int a[5]={0};
for(int i=0; i!=5; i)
a[i] = (rand());

for (int i=0; i!=5; i)
{
char c = (a[i] 48);
XXX[i 1] = c;
}
T_ID = XXX.ToInt();
}while( Table1->FindKey(ARRAYOFCONST((T_ID))) );
[/code]

如果間隔1~2秒呼叫這個函式，是正常的
不過再快一點就會卡在這個while迴圈(一直重複)，不知道要怎麼解這個問題咧…

謝謝ddy副站長的回覆
我也有試著採用這兩篇的概念來寫，但主因似乎是SendMessage發送時間太短所導致函式重入的奇怪問題

現在改採now().val取亂數來縮短wndproc內的處理時間，暫時解決這個問題
我覺得之後還是要改一下我這個架構才是 ^ ^|||

===================引 用 ddy 文 章===================
相關的討論和與章還不少，可參考
http://www.programmer-club.com/ShowSameTitleN/c/38415.html
或是
[BCB] 高效率的產生不重複亂數 隨機數- 洗牌演算法

今天才發現，
主因是TCPServer的Execute事件會無視Randomize
間接導致Random失靈

解決方法只能靠Synchronize來處理了……