ab.com コミュニティ

ご報告ありがとうございます。お返事が遅れてしまい、申し訳ありませんでした。

こちらでも現象を確認できましたので、早速、次回のバージョンアップで修正させていただこうと思います。

linkage関数が閉じてないために表示上のバグが発生したものと思われますね。
しかし一体どうしてそんなメッセージが出るのやら？

#include "poplib.idx"

'-------------------------------------------------------------------
' メモ - このファイルには、DLLの構成要素を記述します。
'        （例：関数定義、グローバル変数、定数定義など）
'
'        エクスポートが必要な関数には、"Export" 修飾子を指定します。
'        （例：Function Export FuncName() As Long）
'-------------------------------------------------------------------

Function Export DllMain(hinstDLL As HINSTANCE, fdwReason As DWord, lpvReserved As VoidPtr) As Long
	'DLLエントリポイント
	Select Case fdwReason
		Case DLL_PROCESS_ATTACH
			'DLLがプロセス空間にロードされた時に実行されます。
			_System_StartupProgram()
			DllMain=1
	End Select
End Function
Function Export Linkage(hKey As HKEY, pass As BytePtr, naiyou As BytePtr)

DLLを作っているときに、発見しました。
下の様なコードを打ちました。
[code]
#include "poplib.idx"

'-------------------------------------------------------------------
' メモ - このファイルには、DLLの構成要素を記述します。
' （例：関数定義、グローバル変数、定数定義など）
'
' エクスポートが必要な関数には、"Export" 修飾子を指定します。
' （例：Function Export FuncName() As Long）
'-------------------------------------------------------------------

Function Export DllMain(hinstDLL As HINSTANCE, fdwReason As DWord, lpvReserved As VoidPtr) As Long
'DLLエントリポイント
Select Case fdwReason
Case DLL_PROCESS_ATTACH
'DLLがプロセス空間にロードされた時に実行されます。
_System_StartupProgram()
DllMain=1
End Select
End Function
Function Export Linkage(hKey As HKEY, pass As BytePtr, naiyou As BytePtr)
[/code]
コンパイルしようとすると当然[quote]poplib.abp(20) - "Function" に対る "End Function" が見つかりません[/quote]
と出ますよね。
でも、その下に
[quote]poplib.abp(20) - ""Function" - "End Function" " に対する "End "Function" - "End Function" " が見つかりません[/quote]
と出ます。これはバグなのでしょうか？
ABのバージョンは4.24です。
よろしくお願いします。