dllファイルの実行ができません

 投稿者:しばっち  投稿日:2021年11月 3日(水)17時59分28秒
  Windows 11を使用しています。

Windows用Lazarus版Basic0705Ja(Win64)でdllを
使おうとすると「ASSIGNはここに書けません」とエラーが出ます。

これは仕様変更されたのでしょうか?
ヘルプのサンプルも実行できません。

DECLARE EXTERNAL FUNCTION MesBox
LET n=MesBox(0,"Hello","BASIC",3)
PRINT n
END

EXTERNAL FUNCTION MesBox(owner,text$,caption$,flag)
ASSIGN "user32.dll","MessageBoxA"
END FUNCTION


もしくはASSIGNはWindows用Lazarus版(Win64)では未サポートなのでしょうか



また、S-JISで保存されたBASファイルは
日本語文字が文字化けするようです

PRINT "あいうえお";123456789
END

UTF-8で保存されたBASファイルでは問題ないようです
 

Re: dllファイルの実行ができません

 投稿者:白石 和夫  投稿日:2021年11月 4日(木)12時52分16秒
  > No.4962[元記事へ]

しばっちさんへのお返事です。

> Windows 11を使用しています。
>
> Windows用Lazarus版Basic0705Ja(Win64)でdllを
> 使おうとすると「ASSIGNはここに書けません」とエラーが出ます。
>
> これは仕様変更されたのでしょうか?
> ヘルプのサンプルも実行できません。
>

同梱のヘルプはVer.8.1のもので,Ver.0.7のヘルプは未完成です。
Ver. 0.7 は,Full BASIC規格の範囲では他のバージョンとほぼ同じですが,独自拡張部分は同等ではありません。





 

戻る