ab.com コミュニティ

動作を確認しました。

素早い対応ありがとうございました。

#ifdef UNICODE
Const _FuncName_DoEnvironmentSubst = "DoEnvironmentSubstW"
Const _FuncName_DragQueryFile = "DragQueryFileW"
Const _FuncName_ExtractAssociatedIcon = "ExtractAssociatedIconW"
Const _FuncName_ExtractIcon = "ExtractIconW"
Const _FuncName_ExtractIconEx = "ExtractIconExW"
Const _FuncName_FindExecutable = "FindExecutableW"
Const _FuncName_GUIDFromString = "GUIDFromStringW"
Const _FuncName_SHBrowseForFolder = "SHBrowseForFolderW"
Const _FuncName_ShellAbout = "ShellAboutW"
Const _FuncName_ShellExecute = "ShellExecuteW"
Const _FuncName_ShellExecuteEx = "ShellExecuteExW"
Const _FuncName_Shell_NotifyIcon = "NotifyIconW"
Const _FuncName_SHEmptyRecycleBin = "SHEmptyRecycleBinW"
Const _FuncName_SHFileOperation = "SHFileOperationW"
Const _FuncName_SHGetFileInfo = "SHGetFileInfoW"
Const _FuncName_SHGetPathFromIDList = "SHGetPathFromIDListW"
Const _FuncName_SHGetSpecialFolderPath = "SHGetSpecialFolderPathW"
#else
Const _FuncName_DoEnvironmentSubst = "DoEnvironmentSubstA"
Const _FuncName_DragQueryFile = "DragQueryFileA"
Const _FuncName_ExtractAssociatedIcon = "ExtractAssociatedIconA"
Const _FuncName_ExtractIcon = "ExtractIconA"
Const _FuncName_ExtractIconEx = "ExtractIconExA"
Const _FuncName_FindExecutable = "FindExecutableA"
Const _FuncName_GUIDFromString = "GUIDFromStringA"
Const _FuncName_SHBrowseForFolder = "SHBrowseForFolderA"
Const _FuncName_ShellAbout = "ShellAboutA"
Const _FuncName_ShellExecute = "ShellExecuteA"
Const _FuncName_ShellExecuteEx = "ShellExecuteExA"
Const _FuncName_Shell_NotifyIcon = "Shell_NotifyIconA"
Const _FuncName_SHEmptyRecycleBin = "SHEmptyRecycleBinA"
Const _FuncName_SHFileOperation = "SHFileOperationA"
Const _FuncName_SHGetFileInfo = "SHGetFileInfoA"
Const _FuncName_SHGetPathFromIDList = "SHGetPathFromIDListA"
Const _FuncName_SHGetSpecialFolderPath = "SHGetSpecialFolderPathA"
#endif

申し訳ありません。こちらの間違いです。
[quote]api_shell.sbp(508) - [警告] DLL関数 "_FuncName_Shell_NotifyIconA" を参照できません。[/quote]
このメッセージをダブルクリックすると，api_shell.abpが開かれるはずです。その中の7-43行目を次の内容に差し替えてください。
[hide][code]#ifdef UNICODE
Const _FuncName_DoEnvironmentSubst = "DoEnvironmentSubstW"
Const _FuncName_DragQueryFile = "DragQueryFileW"
Const _FuncName_ExtractAssociatedIcon = "ExtractAssociatedIconW"
Const _FuncName_ExtractIcon = "ExtractIconW"
Const _FuncName_ExtractIconEx = "ExtractIconExW"
Const _FuncName_FindExecutable = "FindExecutableW"
Const _FuncName_GUIDFromString = "GUIDFromStringW"
Const _FuncName_SHBrowseForFolder = "SHBrowseForFolderW"
Const _FuncName_ShellAbout = "ShellAboutW"
Const _FuncName_ShellExecute = "ShellExecuteW"
Const _FuncName_ShellExecuteEx = "ShellExecuteExW"
Const _FuncName_Shell_NotifyIcon = "NotifyIconW"
Const _FuncName_SHEmptyRecycleBin = "SHEmptyRecycleBinW"
Const _FuncName_SHFileOperation = "SHFileOperationW"
Const _FuncName_SHGetFileInfo = "SHGetFileInfoW"
Const _FuncName_SHGetPathFromIDList = "SHGetPathFromIDListW"
Const _FuncName_SHGetSpecialFolderPath = "SHGetSpecialFolderPathW"
#else
Const _FuncName_DoEnvironmentSubst = "DoEnvironmentSubstA"
Const _FuncName_DragQueryFile = "DragQueryFileA"
Const _FuncName_ExtractAssociatedIcon = "ExtractAssociatedIconA"
Const _FuncName_ExtractIcon = "ExtractIconA"
Const _FuncName_ExtractIconEx = "ExtractIconExA"
Const _FuncName_FindExecutable = "FindExecutableA"
Const _FuncName_GUIDFromString = "GUIDFromStringA"
Const _FuncName_SHBrowseForFolder = "SHBrowseForFolderA"
Const _FuncName_ShellAbout = "ShellAboutA"
Const _FuncName_ShellExecute = "ShellExecuteA"
Const _FuncName_ShellExecuteEx = "ShellExecuteExA"
Const _FuncName_Shell_NotifyIcon = "Shell_NotifyIconA"
Const _FuncName_SHEmptyRecycleBin = "SHEmptyRecycleBinA"
Const _FuncName_SHFileOperation = "SHFileOperationA"
Const _FuncName_SHGetFileInfo = "SHGetFileInfoA"
Const _FuncName_SHGetPathFromIDList = "SHGetPathFromIDListA"
Const _FuncName_SHGetSpecialFolderPath = "SHGetSpecialFolderPathA"
#endif[/code][/hide]

注意事項に書かれていることと関係あるんじゃないでしょうか？
[quote]DLLのコンパイルに対応していません。DLLに対応したGCモジュールを製作中です。[/quote]

[quote]api_shell.sbp(508) - [警告] DLL関数 "_FuncName_Shell_NotifyIconA" を参照できません。[/quote]
"Shell_NotifyIcon" をデバッグしたところ、
上記のエラーが出てきました。

デバッグ実行ではプログラムが実行されたあと、
[quote]プロシージャ エントリポイント _FuncName_Shell_NotifyIconA がダイナミックリンク ライブラリ SHELL32.DLL から見つかりませんでした。[/quote]
というエラーメッセージが出てきます。
OK を押したら、
[quote]例外処理(code:&HC0000138)
例外処理(code:&HC0000139)
スレッド(&HEBC)でアクセス違反がありました(EPI=&H0001E4BA)。[/quote]
というエラーの文が表示されます。

AB: 5.00.00 (CP4)
OS: WinXP Pro SP2