自作DLLの定義

解決

MOMO  2003-12-24 08:40:53  No: 6372  IP: 192.*.*.*

こんにちは、MOMOと申します。

VBはよく使うのですが、Delphiはまだ覚えたてで、
自作のDLLをどう定義して使えば良いのか分りません。

Public Declare Function GethWnd Lib "myDLL.dll" () As Long
Public Declare Sub SetHook Lib "myDLL.dll" (ByVal SethWnd As Long)
Public Declare Sub FreeHook Lib "myDLL.dll" ()

VBですと、このような感じでできるのですが、
Delphiではどのように記述できるでしょうか？

宜しくお願いします。

編集 削除
にしの  2003-12-24 09:15:54  No: 6373  IP: 192.*.*.*

function GethWnd: DWORD; stdcall; external 'myDLL.dll' name GethWnd';
procedure SetHook(SethWnd: DWORD); stdcall; external 'myDLL.dll' name 'SetHook';
procedure FreeHook; stdcall; external 'myDLL.dll' name 'FreeHook';

こんな感じでしょうか。

編集 削除
MOMO  2003-12-24 09:26:09  No: 6374  IP: 192.*.*.*

にしのさん、こんにちは。

早速ありがとうございます、
なるほどこんな感じで記述するのですね、
たいへん勉強になります。

どうもありがとうございました<m(__)m>

編集 削除