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:08 発信者:こてちゅ
題名:RE(4):PB6.5: singleLineEditにて別の文字を代替入力するには?(発見っ!)

ssakaさん、こんにちは。

イベントID pbm_enchange のユーザイベントを作成し、

String a
Long pos_a

pos_a = Pos(This.Text,\"+\")
If pos_a > 0 Then
a = Left(This.Text,pos_a -1) + \"A\" + Right(This.Text,len(This.Text) - pos_a)
This.text = a
End If

とします。
これでどうだっ!

因みに、SelectTextしていないので、IF文にはいると、
先頭にフォーカスが移ってしまいます。実際のスクリプトでは、フォーカスを最終位置に
くるようにセットしてください。

付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows98
DBMS Sybase Open Client/C 11
Browser (記載なし)

Server SoftWare

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

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