PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
3142 98/09/07 12:32:08 RE:PB5.0.03: Tree View の2階層目以降の表示の仕方がうまくいきません By gumi
3139 98/09/07 11:16:10 RE:Itempoplateのサンプルです。 By gumi
3135 98/09/07 10:47:18 Itempoplateのサンプルです。 By kin
3128 98/09/06 21:49:44 RE:RE:RE:RE:RE:RE:PB5.0.03: Tree View の2階層目以降の表示の仕方がうまくいきません By gumi
3127 98/09/06 12:58:23 RE:RE:RE:RE:RE:PB5.0.03: Tree View の2階層目以降の表示の仕方がうまくいきません By こてちゅ
3126 98/09/05 22:39:10 RE:RE:RE:RE:PB5.0.03: Tree View の2階層目以降の表示の仕方がうまくいきません By gumi
3121 98/09/04 18:19:11 RE:RE:RE:PB5.0.03: Tree View の2階層目以降の表示の仕方がうまくいきません By kin
3119 98/09/04 17:50:39 RE:RE:RE:PB5.0.03: Tree View の2階層目以降の表示の仕方がうまくいきません By kin
3114 98/09/04 16:51:33 RE:RE:PB5.0.03: Tree View の2階層目以降の表示の仕方がうまくいきません By gumi
3110 98/09/04 16:17:31 RE:PB5.0.03: Tree View の2階層目以降の表示の仕方がうまくいきません By kin
3108 98/09/04 15:45:31 PB5.0.03: Tree View の2階層目以降の表示の仕方がうまくいきません By gumi

カテゴリ:旧電子会議室
日付:1998年09月07日 10:47 発信者:kin
題名:Itempoplateのサンプルです。

前回コメントした部署と社員で説明します。
一階層目につては説明を省略します。
Labelには以下の項目を持ちます。
一階層目:部署コード(5Byte)+部署名(可変長)
二階層目:社員コード(10Byte)+社員名(可変長)

tv_1のItempoplateイベント

long ll_loop //LOOPカウンタ
long ll_rowcount //社員データの検索件数
string ls_busyo_cd //部署コード
TreeviewItem ltvi_item01 //TreeviewItem一階層目
TreeviewItem ltvi_item02 //TreeviewItem二階層目
//データストアのids_syainはインスタンス変数で宣言し、
//ConstructorでCreateしてください。

//TreeviewItem二階層目にpictureをセット
ltvi_item02.PictureIndex = 2

//クリックした部署アイテムをGetする。
//Itempoplateイベントの引数handleを使用する
this.GetItem(handle,ltvi_item01)
//Labelプロパティから部署コードを取得する
ls_busyo_cd = Left(ltvi_item01.Label, 5)
//社員データを部署コードで検索し、検索件数を取得
ll_rowcount = ids_syain.Retrieve(ls_busyo_cd)

//社員データ件数分二階層目を作成する
For ll_loop = 1 to ll_rowcount
  //社員コードとを社員名をLabelにセット
  ltvi_item02.Label = ids_syain.GetItemString(ll_loop, 1) &
           + ids_syain.GetItemString(ll_loop, 2)
  //クリックした部署の下に社員アイテムを追加
  this.InsertItemLast(handle, ltvi_item02)
Next

こんな感じです。
こてちゅさんの方法は複数の階層に対応したものですが、
ここにアップするのには大きすぎますので、後は色々悩んでみてください。

付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows NT 4.0
DBMS (記載なし)
Browser (記載なし)

Server SoftWare

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

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