自作DLLの定義

解決

MOMO 2003-12-24 17:40:53 No: 6372

こんにちは、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 18:15:54 No: 6373

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 18:26:09 No: 6374

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

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

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