ab.com コミュニティ

いつもお世話になっています。
今まで、AB4.13 を使用していましたが、本日AB4.21にアップしたところ
従来コンパイルできていたコードでエラーが出てしまいました。

Get #/Put # にて『文法が間違っています』とエラーメッセージが出ます。

コードは以下のように書いています。

Function GetDoubleData(intFileNumber As Integer) As Double
Dim strData As String
Field intFileNumber, 8
Get #intFileNumber, , strData
GetDoubleData = GetDouble(StrPtr(strData))
End Function

記述方法がまずいのでしょうか？
取りあえず、報告いたします。

Get #intFileNumber, , strDataですが
レコード番号が指定されていませんね。

これだとエラーになると思いますが？

ところで、なぜかGET命令でファイルを読むことができなくなっているようです。

レコード番号を省略すると、現在のアクセス位置から読むはずです。
AB4.13では動いていました。ところで、読むことが出来なくなっているというのは、どの様な状況になるのでしょうか？

> Get #intFileNumber, , strDataですが
> レコード番号が指定されていませんね。
>
> これだとエラーになると思いますが？
>
> ところで、なぜかGET命令でファイルを読むことができなくなっているようです。

引数の省略ができなくなっている件は4.21で修正されたことになっている，
「Macroステートメントで定義されている省略パラメータのByRef指定部を省略すると、正常にコンパイルできないバグ」
が完璧には直っていなかったと言うことではないでしょうか？

> ところで、なぜかGET命令でファイルを読むことができなくなっているようです。

私も、読めなくて困ってます。。。（AB 4.13まで正常に動作）

>ところで、読むことが出来なくなっているというのは、どの様な状況になるのでしょうか？

読み込んでも、中身が無い。と言う感じです。。。
つまり、クリーム入りのパンを買って、
食べて見ると、クリームが無かった。と言う感じです。

ご報告ありがとうございます。Get#、Put#が正常に動作しないバグについてですが、次回のバージョンアップで修正しますので、今しばらくお待ちください。