Delphi中的procedure(...)函数是什么意思，有什么作用？谢谢

Question

如：
wv_progress_function = procedure(Current, Maximum: Integer; UserData: Pointer); cdecl;

Answer 1

TNotifyEvent = procedure (Sender: TObject) of object;
通常在做组件的时候用，比如onclick事件，
property OnClick: TNotifyEvent read FOnClick write FOnClick stored IsOnClickStored;FOnClick 就是TNotifyEvent 类型

Answer 2

假如我想把这个Delphi程序改写成VC的，
对于这个语句，在VC中对等的应该如何表示？

Answer 3

//估计是这样吧～
typedef void __fastcall (*wv_progress_function)(int Current, int Maximum, void *UserData);

Answer 4

typedef void cdecl (*wv_progress_function)(int Current, int Maximum, void *UserData);