PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
6026 99/04/16 09:28:14 RE(16):PB6.5: Timingオブジェクトいただきました (^^)/ By まこと
6025 99/04/16 05:25:34 RE(15):PB6.5: Timingオブジェクトいただきました (^^)/ By TAKA
6007 99/04/15 16:02:07 RE(14):PB6.5: TimingオブジェクトにCREATEしてくれたオブジェクトを認識させる方法 By Mika★
6001 99/04/15 13:43:34 RE(13):PB6.5: TimingオブジェクトにCREATEしてくれたオブジェクトを認識させる方法 By まこと
5994 99/04/15 11:28:14 RE(12):PB6.5: TimingオブジェクトにCREATEしてくれたオブジェクトを認識させる方法 By Mika★
5987 99/04/15 00:36:42 RE(11):PB6.5: Timingオブジェクトいただきました (^^)/ By TAKA
5986 99/04/14 20:05:42 RE(10):PB6.5: Timingオブジェクトいただきました (^^)/ By Mika★
5984 99/04/14 19:37:00 RE(9):PB6.5: Timingオブジェクトいただきました (^^)/ By てとらぽっと
5982 99/04/14 19:26:24 RE(8):PB6.5: Timingオブジェクトいただきました (^^)/ By Mika★
5979 99/04/14 18:39:41 RE(7):PB6.5: Timingオブジェクトいただきました (^^)/ By Taka
5975 99/04/14 17:56:15 RE(6):PB6.5: テキストをブリンク(点滅)させたいのですが・・・ By Mika★
5971 99/04/14 17:11:02 RE(5):PB6.5: テキストをブリンク(点滅)させたいのですが・・・ By まこと
5966 99/04/14 14:31:31 RE(4):PB6.5: テキストをブリンク(点滅)させたいのですが・・・ By Pocky
5953 99/04/14 10:46:12 RE(3):PB6.5: テキストをブリンク(点滅)させたいのですが・・・ By てとらぽっと
5952 99/04/14 10:43:31 RE(2):PB6.5: テキストをブリンク(点滅)させたいのですが・・・ By ふくちゃん
5949 99/04/14 10:11:43 RE(1):PB6.5: テキストをブリンク(点滅)させたいのですが・・・ By まこと
5948 99/04/14 09:27:21 PB6.5: テキストをブリンク(点滅)させたいのですが・・・ By Pocky

カテゴリ:ユーザオブジェクト
日付:1999年04月15日 11:28 発信者:Mika★
題名:RE(12):PB6.5: TimingオブジェクトにCREATEしてくれたオブジェクトを認識させる方法

大文字のTAKAさん、こんにちは。

えっと、うまく説明できるかわかりませんが・・・(^-^ゞ

Timingオブジェクト(n_Timingという名だとします。もちろん、事前に作成しておきます。)側に
作成したカスタムビジュアルユーザーオブジェクト型のインスタンス変数を宣言しておきます。
(仮に、u_cst_Blinkというオブジェクトだとします。)
  u_cst_Blink iu_cst_Blink

Timerイベントには、上記カスタムビジュアルユーザーオブジェクト上に貼り付けてあるテキストを
表示・非表示と交互に切り換えるように、記述しておきます。下記のような感じで。
  IF iu_cst_Blink.st_Message.Visible = True THEN
   iu_cst_Blink.st_Message.Visible = False
  ELSE
   iu_cst_Blink.st_Message.Visible = True
  END IF

このまま動かしても、iu_cst_Blinkは「Nullオブジェクトの参照」となってしまうので
u_cst_Blink型の引数を1つ持つイベントを作成して(ue_Initと名付けたとします。)
  iu_cst_Blink = au_cst_Blink // au_cst_Blinkが引数。
と記述しておきます。

u_cst_Blink側でで、TimingオブジェクトをCREATEした後、Timerを起動する前に
上記のイベントを呼び出せばOKです。(下記は、constructorイベントに書けばいいかな?)
  n_Timing in_Timing // インスタンス変数として宣言。

  in_Timing = CREATE n_Timing
  in_Timing.TRIGGER EVENT ue_Init(This) // 自分自身を引数として渡す。
  in_Timing.Start(2)

・・・こんな感じで、2秒おきにテキストがBLINKするオブジェクトができると思います。
おわかりいただければ幸いです。(^-^)

付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

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

Server SoftWare

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

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