REGISTERROUTINEステートメント

DPLプログラムから任意のDLL関数を直接呼ぶための準備をします。

形式

パラメータ

<DLL名>

DLLの名前を文字列で指定します。拡張子を省力したときは '.dll' とみなされます。

<DLL関数名>

宣言したい関数名を文字列で指定します。この関数は <DLL名> で指定されたDLLにエクスポートされて存在していなければなりません。

<DLL関数仕様>

関数仕様を文字列で指定します。省略したときは 'v' とみなされます。

<DLL関数別名>

DPL中で宣言された関数を呼び出すときに用いる識別子を指定します。文字列を指定するのではありません。

例

構造	コマンド	パラメータ
	REGISTERROUTINE	'kernel32', 'GetSystemDirectoryA', 'uSu'
		$BUFF := #ALLOC(256)
	CALL	GetSystemDirectory($BUFF, 256)
	DEBUG	$$RETURN, #STR($BUFF)
		#FREE($BUFF)

解説

• REGISTERROUTINEステートメントは，DPLプログラム中から任意のダイナミックリンクライブラリ（DLL）内の関数を呼べるようにします。
• REGISTERROUTINE によって登録された関数は，ファイル内のこの宣言以降で有効になり，CALLステートメントによって呼び出すことができます。このとき，DLL関数の戻り値はシステム変数 $$RETURN に設定されます。void型の関数のときはナルが $$RETURN に設定されます。
• 上の例は，kernel32.dll に属する GetSystemDirectoryA という関数を呼び出します。関数 GetSystemDirectoryA は，
  

  UINT GetSystemDirectoryA(char* lpszSysPath, UINT cbSysPath);

  というプロトタイプをもっています。'uSu' は関数仕様を決定するための情報で，最初の文字が関数の戻り値（UINT），それ以降が引数の型情報（char*, UINT）となります。全角半角は区別されませんが，大文字小文字は区別されます。これによって示されるデータ型は，DBProのデータ型ではなく，Ｃ言語のデータ型となっています。指定できる文字は以下のとおりです。

  文字	Ｃのデータ型	データ型
  v	void
  c	char	整数型
  s	short	整数型
  i	int	整数型
  l	long	整数型
  b	BYTE(unsigned char)	整数型
  w	WORD(unsigned short)	整数型
  u	UINT(unsigned int)	整数型
  W	DWORD(unsigned long)	整数型
  f	float	実数型
  d	double	実数型
  P	void*	ポインタ型
  S	char*	文字列型

• <DLL関数仕様> を省略したときは，すべてvoidとみなされます。すなわち，'vv'あるいは'v'と指定したのと等価です。通常，引数には void型というのはありませんが，Ｃの慣例で引数が一つもないのを明示するために先頭に唯一voidを指定することができます。他の引数指定中にvoidが現れてはなりません。正しくない指定の場合の効果は保証されません。
• 引数に指定するポインタは，'P'でも'S'でも同じに扱われますが，戻り値の'P'と'S'は異なるので注意してください。
• 呼び出せる関数は，WINAPI型に限られます。このため，wsprintfAのような関数を呼び出すことはできません。
• <DLL名>，<DLL関数名>，<DLL関数仕様> は，<文字列定数式> でなければなりません。したがって，変数などを使用することはできません。たとえば，次のような式が定数式です。

  'Function'

  'File'+'.Ext'

  500

  1+2+3+4+5

  #π

• 一部の組込み関数には，定数式の引数を与えれば定数式として扱われるものもありますが，一般には定数式にはなりません。たとえば，次のようなものが定数式になります。

  #大文字列('lower string')

  #日付('1999/12/31')

  #sin(#π/6)

  次のようなものは定数式にはなりません。

  #乱数(100)

  #バージョン

• <DLL関数別名> を指定することにより，関数名に別名を付けることができます。たとえば次のようにします。

  REGISTERROUTINE 'kernel32', 'GetSystemDirectoryA', 'uSu', PrivateFunc;

  CALLステートメントで参照するのは別名の方となります。このときの呼び出し方は

  CALL PrivateFunc($BUFF, 256)

  のようになります。
• 別名の用途には次のような場合が考えられます。
  • 同じ名前の関数が手続き宣言されている。
  • 異なるDLLにある同じ名前の関数を呼び出したい。
  • 関数名がDBProの識別子として正しくない。
• 別名の指定は，文字列式ではないので注意してください。また，DBProの識別子として正しければ，Ｃでは許されない漢字等を含めることもできます。
• 一般のDLL関数は，DBProのデータ型とは無関係な構造をやり取りします。このため，いくつかの特殊な組込み関数が用意されています。
  #ALLOC
  #FREE
  #PEEK
  #POKE
• REGISTERROUTINEステートメントで登録された関数名が，PROCEDUREステートメントで宣言された関数名などと競合した場合，後者が優先されます。エラーにはなりません。

注意

• DLL関数の利用にはWindowsプログラミングの専門的な知識が必要になります。Windowsプログラミングの経験がない方は使用を控えてください。
• 引数の宣言を誤ったり，正しくない引数を渡してDLL関数を呼び出すと，簡単にアプリケーションエラーが起こりえます。十分なテストを行なったうえでご利用ください。

関連項目

PROCEDUREステートメント

CALLステートメント

DPLの構文