DOWN LOAD BBS [One Topic All View / #197　イベント処理の整形ユーティリティ　第 3.9 版 / Page: 0]

DOWN LOAD BBS

[ 最新記事及び返信フォームをトピックトップへ ]

■358 / inTopicNo.1)

　#197　イベント処理の整形ユーティリティ　第 3.9 版

□投稿者/ ONnoji -(2021/02/25(Thu) 15:33:50)

#197 の拙作：イベント処理の整形ユーティリティ　第 3.9 版の、
INF_ObjectList.kev と INF_ObjectList.kex 共通の虫が見つかりましたのでお知らせいたします。m(__)m

＜現象＞

フォームのセクションのオブジェクト数が２００個またはそれ以上の場合に、オブジェクトのツリーが抽出されない。

＜改修方法＞

一般プロシージャ：prcDimBottomGet　を差し替えます。

【変更前】

手続き定義開始　prcDimBottomGet( 参照文字列 &stringDim[], 参照整数 &bottom )
　変数宣言　自動，文字列｛ &icon, &title = "prcDimBottomGet( )", &msg ｝
　変数宣言　自動，文字列｛ &string ｝
　変数宣言　自動，整数　｛ &i, &loop, &step = 1 ｝

　&bottom = 0

　&loop = #配列要素数( "stringDim" )
　繰り返し　&i = 1, &loop, &step

　　&string = #trim( #変数( "stringDim", &i ), 3 )
　　if ( &string = #u )

　　　&bottom = &i - 1
　　　繰り返し中止
　　end

　繰り返し終了

手続き定義終了

【変更後】

手続き定義開始　prcDimBottomGet( 参照文字列 &stringDim[], 参照整数 &bottom )
　変数宣言　自動，文字列｛ &icon, &title = "prcDimBottomGet( )", &msg ｝
　変数宣言　自動，文字列｛ &string ｝
　変数宣言　自動，整数　｛ &i, &loop, &step = 1 ｝

　&bottom = 0

　&loop = #配列要素数( "stringDim" )
　&string = #trim( #変数( "stringDim", &loop ), 3 )

　if ( &string <> #u )

　　&bottom = &loop
　else
　　繰り返し　&i = 1, &loop, &step

　　　&string = #trim( #変数( "stringDim", &i ), 3 )
　　　if ( &string = #u )

　　　　&bottom = &i - 1
　　　　繰り返し中止
　　　end

　　繰り返し終了
　end

手続き定義終了

引用返信 [メール受信/OFF] 削除キー/

■366 / inTopicNo.2)

　Re[1]: #197　イベント処理の整形ユーティリティ　第 3.9 版

▲▼■

□投稿者/ ONnoji -(2021/08/16(Mon) 11:27:41)

2021/08/16(Mon) 11:28:38 編集(投稿者)

変数名を記述した行が見つかりません（変数宣言を除く）について

以下の変数：&mA と変数：&A は未使用ではないが、

拙作［変数チェック］では「変数名を記述した行が見つかりません（変数宣言を除く）」と表示される。

これは、変数宣言コマンドの範囲で、代入やコメントをしているので、チェックされないためです。

名札　メイン

　変数宣言　局所，文字列｛ &mA ｝
　変数宣言　局所，文字列｛ &mB = &mA ｝ /* &mA */

　&mB = #u

＊

手続き定義開始　prcA()

　変数宣言　自動，文字列｛ &A ｝
　変数宣言　自動，文字列｛ &B = &A ｝ /* &A */

　&B = #u

手続き定義終了

手続き名　　種類/種別　データ型　変数名備考
名札メイン　局所　　　　文字列　　mA　　変数名を記述した行が見つかりません（変数宣言を除く）
名札メイン　局所　　　　文字列　　mB

prcA　　　　自動　　　　文字列　　A　　　変数名を記述した行が見つかりません（変数宣言を除く）
prcA　　　　自動　　　　文字列　　B

　◇　◇　◇　◇　◇　◇

［変数宣言］コマンドの行以外で、変数名を使えばこの問題は発生しません。

名札　メイン

　変数宣言　局所，文字列｛ &mA ｝
　変数宣言　局所，文字列｛ &mB ｝

　&mB = &mA　 /* &mA */
　&mB = #u

＊

手続き定義開始　prcA()

　変数宣言　自動，文字列｛ &A ｝
　変数宣言　自動，文字列｛ &B ｝

　&B = &A　　/* &A */
　&B = #u

手続き定義終了

以前から改修を検討していましたが、改修する手間とその効果を勘案した結果、現状のままとします。

引用返信 [メール受信/OFF] 削除キー/

■367 / inTopicNo.3)

　Re[2]: #197　イベント処理の整形ユーティリティ　第 3.9 版

▲▼■

□投稿者/ ONnoji -(2021/08/20(Fri) 11:28:57)

2021/08/20(Fri) 11:30:25 編集(投稿者)

変数宣言でコンマを忘れた時、ゴーストの変数と認識される虫。

×　変数宣言　自動，数値　｛ &twips, &zoom &dot ｝

〇　変数宣言　自動，数値　｛ &twips, &zoom, &dot ｝

実は、×のままでもエラーにならずに実行できます。

しかし、拙作［変数チェック］ではゴーストの変数と認識してしまいます。

　&zoom &dot ⇒ &zoomdot

いろいろと改修を試みましたが、改修が非常に困難なので現状のままとします。m(__)m

　◇　◇　◇　◇　◇　◇　◇　◇　◇　◇　◇　◇

手続き定義開始　MNUprcMenuAppearVarSend( 文字列 &objectName, 参照整数 &hdl )
　変数宣言　自動，文字列｛ &icon, &title = "MNUprcMenuAppearVarSend( )", &msg ｝
　変数宣言　自動，数値　｛ &posX, &posY, &height ｝
　変数宣言　自動，数値　｛ &targetDotX, &targetDotY ｝
　変数宣言　自動，数値　｛ &setDotX, &setDotY ｝
　変数宣言　自動，数値　｛ &sendDotX, &sendDotY ｝
　変数宣言　自動，数値　｛ &twips, &zoom &dot ｝
　変数宣言　自動，整数　｛ &done,　&openStatus, &clientArea ｝
　変数宣言　自動，整数　｛ &formEditModeNum ｝
　変数宣言　自動，文字列｛ &wfmFileName, &tblFileName, &procedureName ｝
　変数宣言　自動，文字列｛ &sendMacro, &comma = #jis( #hex("2C") ), &WQ = #jis( #hex("22") ) ｝
　変数宣言　自動，長整数｛ &windowPosX, &windowPosY, &windowWidth, &windowHeight ｝
　変数宣言　自動，整数　｛ &traceON = #対応番号( #uc2( #変数( "INFmTraceModuleNameList" ) ), "ALL" ) .or #対応番号( #uc2( #変数( "INFmTraceModuleNameList" ) ), "MNU" ) ｝
　変数宣言　自動，文字列｛ &traceMsg = #cond( #変数( "INFmTraceFormPathAdd" ), &INFmMyWfmPath ) + &INFmMyWfmName + " hdl=" + #last( " " + #str( &hwindow ), 2 ) + ">" + &title ｝
　*&traceON = 0
　条件　( &traceON )　トレース出力　&traceMsg + "を実行開始しました"

手続き名　　　　　　　　種類/種別　データ型　変数名　重複　備考
MNUprcMenuAppearVarSend 自動　　　　数値　　　zoomdot　　　　変数名を記述した行が見つかりません（変数宣言を除く）

引用返信 [メール受信/OFF] 削除キー/

このトピックをツリーで一括表示

トピック内ページ移動 / << 0 >>

このトピックに書きこむ

入力内容にタグは利用できません。

他人を中傷する記事は管理者の判断で予告無く削除されます。
半角カナは使用しないでください。文字化けの原因になります。
名前、コメントは必須記入項目です。記入漏れはエラーになります。
入力内容の一部は、次回投稿時の手間を省くためブラウザに記録されます。
削除キーを覚えておくと、自分の記事の編集・削除ができます。
URLは自動的にリンクされます。
記事中に No*** のように書くとその記事にリンクされます(No は半角英字/*** は半角数字)。
- No123 → 記事No123の記事リンクになります(指定表示)。
- No123,130,134 → 記事No123/130/134 の記事リンクになります(複数表示)。
- No123-130 → 記事No123～130 の記事リンクになります(連続表示)。

Name	/
E-Mail	/
└> 関連するレス記事をメールで受信しますか? / アドレス
Title	/
メッセージ中には下記URLと同じURLを書き込まないで下さい
URL	/
Comment/ 通常モード->　図表モード-> (適当に改行して下さい/半角10000文字以内) ■No367に返信(ONnojiさんの記事) > 2021/08/20(Fri) 11:30:25 編集(投稿者) > > 変数宣言でコンマを忘れた時、ゴーストの変数と認識される虫。 > > ×　変数宣言　自動，数値　｛ &twips, &zoom &dot ｝ > > 〇　変数宣言　自動，数値　｛ &twips, &zoom, &dot ｝ > > 実は、×のままでもエラーにならずに実行できます。 > > しかし、拙作［変数チェック］ではゴーストの変数と認識してしまいます。 > > 　&zoom &dot ⇒ &zoomdot > > いろいろと改修を試みましたが、改修が非常に困難なので現状のままとします。m(__)m > > 　◇　◇　◇　◇　◇　◇　◇　◇　◇　◇　◇　◇ > > 手続き定義開始　MNUprcMenuAppearVarSend( 文字列 &objectName, 参照整数 &hdl ) > 　変数宣言　自動，文字列｛ &icon, &title = "MNUprcMenuAppearVarSend( )", &msg ｝ > 　変数宣言　自動，数値　｛ &posX, &posY, &height ｝ > 　変数宣言　自動，数値　｛ &targetDotX, &targetDotY ｝ > 　変数宣言　自動，数値　｛ &setDotX, &setDotY ｝ > 　変数宣言　自動，数値　｛ &sendDotX, &sendDotY ｝ > 　変数宣言　自動，数値　｛ &twips, &zoom &dot ｝ > 　変数宣言　自動，整数　｛ &done,　&openStatus, &clientArea ｝ > 　変数宣言　自動，整数　｛ &formEditModeNum ｝ > 　変数宣言　自動，文字列｛ &wfmFileName, &tblFileName, &procedureName ｝ > 　変数宣言　自動，文字列｛ &sendMacro, &comma = #jis( #hex("2C") ), &WQ = #jis( #hex("22") ) ｝ > 　変数宣言　自動，長整数｛ &windowPosX, &windowPosY, &windowWidth, &windowHeight ｝ > 　変数宣言　自動，整数　｛ &traceON = #対応番号( #uc2( #変数( "INFmTraceModuleNameList" ) ), "ALL" ) .or #対応番号( #uc2( #変数( "INFmTraceModuleNameList" ) ), "MNU" ) ｝ > 　変数宣言　自動，文字列｛ &traceMsg = #cond( #変数( "INFmTraceFormPathAdd" ), &INFmMyWfmPath ) + &INFmMyWfmName + " hdl=" + #last( " " + #str( &hwindow ), 2 ) + ">" + &title ｝ > 　*&traceON = 0 > 　条件　( &traceON )　トレース出力　&traceMsg + "を実行開始しました" > > 手続き名　　　　　　　　種類/種別　データ型　変数名　重複　備考 > MNUprcMenuAppearVarSend 自動　　　　数値　　　zoomdot　　　　変数名を記述した行が見つかりません（変数宣言を除く） > > >
File	/ アップ可能拡張子=> /.gif/.jpg/.jpeg/.png/.txt/.lzh/.zip/.mid 圧縮ファイル[lzh,zip]は、事前に解凍してご利用下さい。 1) 太字の拡張子は画像として認識されます。 2) 画像は初期状態で縮小サイズ250×250ピクセル以下で表示されます。 3) 同名ファイルがある、またはファイル名が不適切な場合、　　ファイル名が自動変更されます。 4) アップ可能ファイルサイズは1回200KB(1KB=1024Bytes)までです。 5) ファイルアップ時はプレビューは利用できません。 6) スレッド内の合計ファイルサイズ:[0/500KB] 残り:[500KB]
パスワード	/ 半角小文字で「ケイ・アイ・アール・アイ」を入力
削除キー	/ (半角8文字以内)
解決済み! BOX/ 解決したらチェックしてください!
プレビュー/

- Child Tree -
- Antispam Version -