winapi sleep 應如何宣告使用,實在試不出來, 麻煩教一下, 謝謝! <textarea cols="60" rows="10" class="delphi" name="code"> Program Test; function sleep(dwMilliseconds : longint); extenal 'sleep@KERNEL32.dll stdcall'; begin sleep(500); End. </textarea> win32.hlp 宣告如下: VOID Sleep( DWORD dwMilliseconds // sleep time in milliseconds ); vb 宣告如下: Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) windows.pas 宣告如下: procedure Sleep; external kernel32 name 'Sleep'; procedure Sleep(dwMilliseconds: DWORD); stdcall;

------
努力會更接近成功

直接uses SysUtils
它已幫你宣告
{$IFDEF MSWINDOWS}
procedure Sleep; external kernel32 name 'Sleep'; stdcall;
{$ENDIF}

在程式中使用:sleep(100)

我是用ramob pascal script 不能直接引用sysutil
我的問題出在宣告不成功,
function sleep(dwMilliseconds : longint); extenal 'sleep@KERNEL32.dll stdcall';

------
努力會更接近成功

參考Win32 API原本的宣告
VOID Sleep(DWORD dwMilliseconds); //DWORD means 32-bit unsigned integer.

所以大大的宣告應該是:
procedure sleep(dwMilliseconds : longword); external 'sleep@KERNEL32.dll stdcall';

------
先查HELP
再查GOOGLE
最後才發問

沒人有義務替你解答問題
在標題或文章中標明很急
並不會增加網友回答速度

Developing Tool:
1.Delphi 6
2.Visual Studio 2005
3.Visual Studio 2008
DBMS:
MS-SQL

編輯記錄

剛看了RemObject PASCAL S cript 的網頁
http://remobjects.com/page.asp?id={9A30A672-62C8-4131-BA89-EEBBE7E302E6}

提供的 type 是:
Byte, Shortint, Char, Word, SmallInt, Cardinal, Longint, Integer, String, Real, Double, Single, Extended, Boolean, Array, Record, Enumerations, Variant, IUnknown, IDispatch (dynamic invoke)

所以試看看
procedure sleep(dwMilliseconds : Cardinal) external 'sleep@kernerl32.dll stdcall';

------
先查HELP
再查GOOGLE
最後才發問

沒人有義務替你解答問題
在標題或文章中標明很急
並不會增加網友回答速度

Developing Tool:
1.Delphi 6
2.Visual Studio 2005
3.Visual Studio 2008
DBMS:
MS-SQL

如下宣告:
procedure Sleep(dwMilliseconds :Longword); external 'Sleep@kernel32 stdcall';
請注意 引號內的Sleep 是Case-Sensitive的

另, type 使用 Longword 或 Cardinal 宣告都可以

------
先查HELP
再查GOOGLE
最後才發問

沒人有義務替你解答問題
在標題或文章中標明很急
並不會增加網友回答速度

Developing Tool:
1.Delphi 6
2.Visual Studio 2005
3.Visual Studio 2008
DBMS:
MS-SQL

可以了, 實在太謝謝您了!
可以冒昧請教您, 把它當function是我的錯誤, 若以學習的態度言, 應該罰寫1000次的,
但是類似的問題我實在問太多了, 許多版主當我是VB的user來鬧場的,
我不過是覺得pascal有Script也蠻好的, 就像Asp, Windows Script Host(總是有接觸,很難很難用)
當我在研究RemObject PASCAL Script 一方面沒有help可看, news也無什可參考之處, svc也看不出所以然
(免費給你用就不錯了,不好用你幹麻一直測)其實也還不錯用, 要是那位大大開發http server支援 PASCAL Script
講太多了, 想請問大大如何找到答案的, 這樣ktop的朋友們也不會把我當白目的提問者, 求求你, 告訴我如何找答案,
再次謝謝你, 至少你沒有把我當怪物看待.


===================引 用 eaglewolf 文 章===================
如下宣告:
procedure Sleep(dwMilliseconds :Longword); external 'Sleep@kernel32 stdcall';
請注意引號內的Sleep是Case-Sensitive的

另, type 使用 Longword 或 Cardinal 宣告都可以

------
努力會更接近成功

編輯記錄

大大言重了
主要還是從Delphi 的 Windows SDK Help 或是 Windows.Pas去找
會先在delphi 的ide 環境 宣告並嘗試執行
再轉成 RemObject PS 的 宣告方式

===================引 用 pceyes 文 章===================
可以了, 實在太謝謝您了!
可以冒昧請教您, 把它當function是我的錯誤, 若以學習的態度言, 應該罰寫1000次的,
但是類似的問題我實在問太多了, 許多版主當我是VB的user來鬧場的,
我不過是覺得pascal有Script也蠻好的, 就像Asp, Windows Script Host(總是有接觸,很難很難用)
當我在研究RemObject PASCAL Script 一方面沒有help可看, news也無什可參考之處, svc也看不出所以然
(免費給你用就不錯了,不好用你幹麻一直測)其實也還不錯用, 要是那位大大開發http server支援 PASCAL Script
講太多了, 想請問大大如何找到答案的, 這樣ktop的朋友們也不會把我當白目的提問者, 求求你, 告訴我如何找答案,
再次謝謝你, 至少你沒有把我當怪物看待.


===================引 用 eaglewolf 文 章===================
如下宣告:
procedure Sleep(dwMilliseconds :Longword); external 'Sleep@kernel32 stdcall';
請注意引號內的Sleep是Case-Sensitive的

另, type 使用 Longword 或 Cardinal 宣告都可以

------
先查HELP
再查GOOGLE
最後才發問

沒人有義務替你解答問題
在標題或文章中標明很急
並不會增加網友回答速度

Developing Tool:
1.Delphi 6
2.Visual Studio 2005
3.Visual Studio 2008
DBMS:
MS-SQL