お世話になります。
下記サイトで公開されているsinku.dllを使おうと思ってるんですが、うまく詳細が取得できません。
http://kurohane.net/seisanbutu.html
readmeは読んだんですが、DLLの呼び出しにはあまり慣れていないので、どこか間違っているんだとは思いますが、原因がわからずにいます。
どのように直したらよいか、教えていただけると幸いです。
☆ 短時間で書いたソースなので、結構汚いです。お許しください。
#uselib "Sinku.dll" #func GetDllVersion "GetDllVersion" #cfunc GetFileInfoAuto "GetFileInfoAuto" sptr #cfunc ConvertFull "ConvertFull" sptr, sptr #cfunc ConvertFullLen "ConvertFullLen" sptr GetDllVersion dialog strf("DLLのバージョンは、%06dです。", stat) name="file1.ogg" ret=GetFileInfoAuto(varptr(name)) detail=ret ret=ConvertFullLen(varptr(detail)) result=ConvertFull(varptr(detail), varptr(ret)) dialog result
以上、よろしくお願いします。