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 (記載なし)
Copyright © 2013 Power Future Co., Ltd.