timer控件的使用

[diligent_boy]

我想每隔5秒输出一个数，共输出3个，
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
//interval=5000已定义
static int stp=0; //静态变量，便于3次后终止
while(stp == 0)
{
Randomize;
Edit1->Text=IntToStr(12);
Randomize;
Edit2->Text=IntToStr(123);
Randomize;
Edit1->Text=IntToStr(124);
stp=1;
}
}
可为什么它们同时显示呢，怎样才能间隔显示

[diligent_boy]

不知道这样为什么不行呢？为什么同时显示呢？
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
Edit1->Text=IntToStr(123);
Sleep(1000);
Edit2->Text=IntToStr(123);
Sleep(1000);
Edit1->Text=IntToStr(124);
Timer->Enabled=false;
}

• 打赏
• 举报

回复 赞

[hzbigdog]

void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
//interval=5000已定义
static int stp=0; //静态变量，便于3次后终止
switch (++stp)
{
case 1:Edit1->Text=IntToStr(12);break;
case 2:Edit2->Text=IntToStr(123);break;
case 3:Edit3->Text=IntToStr(124);break;
default: Timer1->Enabled = false;
}
}

• 打赏
• 举报

回复 赞

[quickeer]

int stp = 0;
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
if(0==stp)
Edit1->Text=IntToStr(12);
else if (1==stp)
Edit2->Text=IntToStr(123);
else if (2==stp)
Edit3->Text=IntToStr(1234);
else
Timer1->Enabled = false;
stp++;
}

• 打赏
• 举报

回复 赞

[ch_builder]

你的程序真有趣，用TTimer本身就是调控时间的，你却让他不起作用Timer->Enabled=false;
而Sleep(1000)是延时不假，但他是使这个函数结束延时，千万不能认为是让他后面的语句等上1000毫秒后才执行，所以你的代码只是让这个函数执行时浪费点时间罢了，并且你的那三个Sleep(1000)与一个Sleep(3000)没什么区别，至少在CB中是这样的：（

• 打赏
• 举报

回复 赞

[weixing979]

Timer到执行时把你写的三条语句都执行了，当然是同时显示了

• 打赏
• 举报

回复 赞

[weixing979]

hzbigdog(苦命的程序员) 的方法可以用啊

• 打赏
• 举报

回复 赞