2010/09/26

[轉貼]Delay的寫法

資料來源
void Delay(int iMilliSeconds)
{
  int iStart;

  iStart = GetTickCount();
  while (GetTickCount() - iStart <= iMilliSeconds)
    Application->ProcessMessages();
}

用後感:
利用了Win32 API來進行讀秒的工作,真是大絕!
在與多執行緒搶行程的時候,可以用這個來避免Hold

沒有留言:

張貼留言

How to use URLEncode in Delphi

URL編碼,也稱【百分號編碼(Percent-encoding)】 由於 URL 不能直接接受 UTF8 文字,所以要先轉成百分號編碼後,如此網址才能順利送給 HTTP Server 從 Indy 加入 Delphi 後,就可以用 IdURI.TIdURI 單元進行編碼 ...