PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
114 98/08/06 16:15:38 バグ情報その1 By こてちゅ

カテゴリ:その他
日付:1998年08月06日 16:15 発信者:こてちゅ
題名:バグ情報その1

Number型のエディットマスクコントロールで文字列を全選択して、BackSpaceキーを押すと何も起こらないという現象が起きています。
パワーソフトに問い合わせたところ、PowerBuilderの不具合である事がわかりました。

回避方法は・・・・・(以下、PowerSoftより回答された内容です。)

【回避策】
エディットマスクにユーザイベント(イベントID pbm_keydown)を定義します。
定義したイベントにスクリプトを記述します。

[スクリプト]
int li_pos, li_len, i
string ls_zero

// [BackSpace] が押下された時の処理
IF key = KeyBack! THEN
 This.SetRedraw(FALSE)
 // 選択されているテキストの長さを取得
 li_len = Len(This.SelectedText())
 // 選択されたテキストと同じ数だけゼロを連結
 FOR i = 1 TO li_len
  ls_zero = ls_zero + \"0\"
 END FOR
 // カーソルの位置を取得
 li_pos = This.Position()
 // 表示するテキストを編集しセット
 This.text = ls_zero + Left(This.text, li_pos -1) &
    + Right(This.text, (Len(This.text) - (li_pos+li_len -1)))
 // カーソルの位置を指定
 This.SelectText(li_pos, 0)
 This.SetRedraw(TRUE)
 RETURN 1
END IF

以上、参考になれば・・・・

付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS (記載なし)
DBMS (記載なし)
Browser (記載なし)

Server SoftWare

OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)

PowerSpaceの運営は、パワーフューチャー株式会社が行っております。
Copyright © 2013 Power Future Co., Ltd.