我想產生一個訊息..    讓它停留2秒..然後再自動關閉..    可以不經由user去按"確定"鈕..    程式碼如下:

 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  ShowMessage("test");
  Timer1->Enabled = true;
}
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
  SendMessage(GetActiveWindow, WM_CLOSE, 0, 0);
  Timer1->Enabled = false;
}

我不知道我程式哪裡出了.. 謝謝大家的幫忙!!

第一各錯誤: 你必須先把timerㄉenabled設為true void __fastcall TForm1::Button1Click(TObject *Sender) { Timer1->Enabled = true; ShowMessage("test"); } 第二個錯誤: SendMessage第一各引數是hwnd, 所以你在GetActiveWindow少加ㄌ() void __fastcall TForm1::Timer1Timer(TObject *Sender) { SendMessage(GetActiveWindow(), WM_CLOSE, 0, 0); Timer1->Enabled = false; } 這樣就可以ㄌ

你提供的方法已經可以解決我的問題了...    謝謝!!...    再請問一下?..    除了利用Timer還可以用哪些其他的方法呢?....    謝謝大家的幫忙!!

sorry， try了一下之後發現， 剛剛提供的那個sleep()的方法是錯的， 不好意思哦~ 國泰平安 發表人 -

利用 gettickcount()    void __fastcall TForm1::Button1Click(TObject *Sender) { ShowMessage("test");    const delaytime=5000;  //delay 5 秒 int ts=gettickcount(); while(gettickcount()-ts

感謝大家後來的回應 後來問題我用 Timer 解決了 不過我也學到了前人的經驗 多學了一些方法