ab.com コミュニティ

AB4.24で試してみたところコンパイルエラーにならなかったため記載することは可能でした。 しかし実行すると、 下記のケース１は問題ありませんでしたが、 下記のケース２はIの値が1以外にもかかわらず*JMP1に分岐されていました。 なのでこのような記載はやめたほうがよいと私は思いますが。 ご確認よろしくお願いいたします。 ケース１ DIM A AS Long A = 2 IF A = 1 THEN *JMP1 ELSE *JMP2 *JMP1 MessageBox(NULL,"*JMP1","TEST",MB_OK) END *JMP2 MessageB...

AB4.24/AB5ともに上記の現象を確認しました。
ABのヘルプをみるとたぶん仕様である気がしますが？。
ちなみに上記と同様な事をEXCEL2010のVBAと十進BASIC(インタープリタタイプ)で
実験してみたら一回でFOR～NEXTを抜けました。

過去に同様な投稿がありましたが、 以下の様にすればよいと思います。 #N88BASIC /* AB5CP5の場合 */ SetWindowText(ActiveBasic.Prompt.Detail._PromptSys_hWnd,"TEST PROGRAM") /* AB4の場合 */ SetWindowText(_PromptSys_hWnd,"TEST PROGRAM") PRINT "TEST PROGRAM" MessageBox(NULL,"TEST","TESTEND",MB_OK...

上記の事象について私は遭遇したことがありませんのでわかりません。
この投稿をみて念のため自作の各タイプのプログラムを動かしてみましたが。
そこで確認ですが、
●使用しているABのバージョンはAB4またはAB5ですか？
●ご自身で作成されたプログラムのタイプはノーマルウインドウ系またはN88BASIC系DOSプロンプトのいずれかですか？
●常に上記の現象が発生するのでしょうか？

もしノーマルウインドウ系のプログラムであればWin32 Api SetWindowTextでプログラムのウインドウのタイトルを変更すればよいと思いますが？
よろしくお願いいたします。

RADツール(AB4.24は確認/AB5は未確認)でEDITコントロールをに1個づつ貼り付けて100個以上並べても上記の現象は発生しませんが、
複数個まとめてEDITコントロールを貼り付けようとすると下記のトピックのような現象が発生した際に上記の現象がおこることがありました。

RADでのコントロールのコピー

この場合wndファイルをエディタで修正することで解決しました。
よろしくお願いいたします。

2019/1/30修正

私の場合、 AB5/CP5/CP4/CP3にてPC(Windows7/SP1(X86))にメモリカードリーダ機能付きのプリンタを接続しかつ、 メモリーカードリーダ(ドライブはF:\とする)にメモリーカードを入れていない状態でかつ、 設定ファイル(history.ini)にF:\A.ABPといったファイル名が存在するとき上記の状態が発生します。 ポップアップメッセージの内容 ドライブにディスクがありません。 ディスクをドライブ \Device\Harddisk1\DR2 に挿入してください。 設定ファイル(history.ini)にあるF:\A.ABPをD:\A.ABP(ローカルディスク)に変更...

具体的な使用方法はわかりませんが、
AB5CP5では「静的ライブラリが作成可能」であることがAB5 バージョンアップ履歴に記載されていました。

ISCharAlphaNumeric関数からIsDBCSLeadByte関数に変更するだけでよいと思います。
ただし判定方法は <> FALSEとなります。

Joinとsplitともに現在のABにはありません。
ご自身で作成されたほうがよいかもしれません。
ちなみにsplitについては類似した機能を実践コードモジュールで水波形さんが投稿されています。
念のためこちらを確認してみて下さい。

よろしくお願いいたします。

私は可能な限り大文字(dim → DIM)でコーディングするので(dim → Dim)といった自動補正は不要だと思っています。
しかしオプション(表示→オプション)で「自動補正／従来どおり」の切り替えができるならば実装してもよいと思います。
2017/12/29修正

下記のサンプルプログラムTESTA.ABPの様に ①SUB～END SUBの途中で抜け出すときEXIT SUB命令であるべきところをEXIT FUNCTION命令を記載 ②FUNCTION～END FUNCTIONの途中で抜け出すときEXIT FUNCTION命令であるべきところをEXIT SUB命令を記載 上記①②のケースではコンパイルエラーになると思いましたが、問題なくコンパイルと実行ができました。 そこで確認したいのですが、これは仕様でしょうか？ 特にこれといった問題は起きていませんが。 確認環境はWindows 7/SP1(X86) 確認バージョンはAB4.24とAB5/CP4とAB5...

AB5/CP5またはAB5/CP4で以下のプログラムをコンパイルして起動(TESTMAINから起動)すると、 TESTSUB.EXEの処理に移った際のGC.SBPにて、 「既にGCがプロセスに存在する」らしきポップメッセージが表示され、 TESTSUB.EXEが例外コードC0000005で異常終了します。 確かに現時点ではまだＧＣ処理がらみが不完全のため仕方がないと思ってますが。 そこで確認したいのですが、 ①これは仕様でしょうか？ ②正式版がリリース時点で上記の件は解消されるのでしょうか？ よろしくお願いいたします。 /****************/ /* TESTMAIN.ABP */...

バイト型配列で「If buffer = "x86" Then」でコーディングすると C/C++と同様にbufferの値が"x86"かどうかではなくbufferのポインタの値と"x86"のポインタの値が一致するかどうかという判定となります。 なので期待通りに動作しません。 そこで「If buffer = "x86" Then」を「If memcmp(buffer,"x86",3) = 0 Then」に変更すると期待通りに動作します。 なおmemcmpはabのヘルプにのってません。 詳細はネットで検...

ネットで検索すると主にバッチファイルの例ですが参考になると思います。
ご確認願います。

環境変数の値の判定結果で取得できます。 具体的には環境変数(PROCESSOR_ARCHITECTURE)が ●"x86"のときは32BIT版Windows ●"AMD64"または"IA64"のときは64BIT版Windowsと判定できます。 しかし64BIT版Windowsで32BITのプログラム(この場合はインストーラを示す)が起動されたとき、 環境変数(PROCESSOR_ARCHITECTURE)に"x86"が設定されて「32BIT版Windows」とみなされます。 以下に示す手順で行ってみてください。 ●...