|
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ファイルでは問題ないようです
|
|