!!!!!谁能帮我把这段delphi代码 用C#写出来 200分求助

[SealedLove]

procedure Delay(msecs:integer);
var
  Tick: DWord;
  Event: THandle;
begin
  Event := CreateEvent(nil, False, False, nil);
  try
    Tick := GetTickCount + DWord(msecs);
    while (msecs > 0) and (MsgWaitForMultipleObjects(1, Event, False, msecs, QS_ALLINPUT) <> WAIT_TIMEOUT) do
    begin
      Application.ProcessMessages;
      msecs := Tick - GetTickcount;
    end;
  finally
    CloseHandle(Event);
  end;
end;

[surlew]

帮顶个先

[jimh]

相同的功能，C＃一句话就可以了，

Thread.Sleep(msecs);//当前线程延时指定的毫秒数然后再往下执行，（不会堵塞）

[calen]

看不懂delphi

[dean615]

mark

[zuoxxx]

不懂,似乎就是sleep啊
帮顶接分哈~~

[soaringbird]

Delphi本来就有sleep呀