PB 電子会議室
| 発言No. | 更新日 | 題名（クリックすると発言内容と関連するコメントが表示されます） |
|---|---|---|
| 8128 | 99/09/09 17:38:24 | RE(7):PB6.5: singleLineEditにて別の文字を代替入力するには？（発見っ！） By ssaka |
| 8127 | 99/09/09 17:37:26 | RE(6):PB6.5: singleLineEditにて別の文字を代替入力するには？ By ssaka |
| 8126 | 99/09/09 17:16:53 | RE(5):PB6.5: singleLineEditにて別の文字を代替入力するには？ By てとらぽっと |
| 8125 | 99/09/09 17:08:00 | RE(4):PB6.5: singleLineEditにて別の文字を代替入力するには？（発見っ！） By こてちゅ |
| 8124 | 99/09/09 16:55:16 | RE(3):PB6.5: singleLineEditにて別の文字を代替入力するには？ By こてちゅ |
| 8122 | 99/09/09 16:43:07 | RE(2):PB6.5: singleLineEditにて別の文字を代替入力するには？ By ssaka |
| 8121 | 99/09/09 16:48:31 | RE(1):PB6.5: singleLineEditにて別の文字を代替入力するには？ By こてちゅ |
| 8120 | 99/09/09 16:20:45 | PB6.5: singleLineEditにて別の文字を代替入力するには？ By ssaka |
カテゴリ：スクリプトの記述
日付：1999年09月09日 17:37 発信者：ssaka
題名：RE(6):PB6.5: singleLineEditにて別の文字を代替入力するには？
てとらぽっとさん、こんにちは。
＞ssakaさん、こてちゅさん、こんにちは。
＞
＞＞Return 1
＞＞ってやっても、\'+\'が入っちゃうのはなぜだろう？
＞＞って、これが有効なのは、RichTextEditだけって書いてある(ToT)
＞
＞そのようですね。(;_;)
＞
＞しかしながらエディット系は pbm_KeyDownイベントより
＞pbm_enchangeイベントを使ったほうがよさそうですので、
＞イベントから変えてみました。
＞
＞多分(^^; 上手く行くと思います。
＞
＞
＞string ls_wk
＞long ll_pos
＞
＞ll_pos = this.position()
＞
＞if \'+\' = mid(this.Text, ll_pos - 1, 1) then
＞ ls_wk = mid(this.Text, 1, ll_pos - 2) + \"A\" + mid(this.Text, ll_pos)
＞ this.Text = ls_wk
＞ this.SelectText(ll_pos, 0)
＞end if
＞
＞
ありがとうございます！完璧です。
早く、自分でも考えつくようになりたいです！
付加情報：
PowerBuilder Version (記載なし)
Client SoftWare
OS Windows98
DBMS Sybase Open Client/C 11
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS Oracle 8.0
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.