PB 電子会議室
| 発言No. | 更新日 | 題名（クリックすると発言内容と関連するコメントが表示されます） |
|---|---|---|
| 1752 | 98/06/09 19:22:36 | RE(8):iniファイルのkey一覧を取得するAPI By tomo |
| 1725 | 98/06/08 17:30:32 | RE(7):サンプル#2です。 By manabu |
| 1724 | 98/06/08 17:21:56 | RE(6):サンプル#1です。 By manabu |
| 1723 | 98/06/08 16:51:44 | RE(5):iniファイルのkey一覧を取得するAPI By manabu |
| 1722 | 98/06/08 16:49:47 | RE(4):iniファイルのkey一覧を取得したい By manabu |
| 1717 | 98/06/08 10:58:08 | RE(3):iniファイルのkey一覧を取得したい By こてちゅ |
| 1700 | 98/06/05 13:38:23 | RE(2):iniファイルのkey一覧を取得したい By manabu |
| 1690 | 98/06/05 10:59:27 | RE(1):iniファイルのkey一覧を取得したい By aki |
| 1676 | 98/06/04 17:46:34 | iniファイルのkey一覧を取得したい By tomo |
カテゴリ：旧電子会議室
日付：1998年06月08日 17:21 発信者：manabu
題名：RE(6):サンプル#1です。
//
// リストボックス(lb_1)にwin.iniのセクションの一覧を表示します。
//
CONSTANT char NULL_CHAR = Char(0)
CONSTANT long BUF_SIZE = 1024
string ls_key, ls_default, ls_file
string ls_section[]
char buf[], temp[], clear[]
long ll_rtn, i, j = 0, k = 0
// パラメータの設定
ls_key = \"\"
ls_default = \"(none)\"
ls_file = \"win.ini\"
buf = Space(BUF_SIZE)
// セクション名の取得と切り出し
ll_rtn = GetPrivateProfileSectionList(0, ls_key, ls_default, buf, BUF_SIZE - 1, ls_file)
FOR i = 1 TO ll_rtn
j ++
temp[j] = buf[i]
IF temp[j] = NULL_CHAR THEN
j = 0
k ++
ls_section[k] = temp
temp = clear
END IF
NEXT
// セクション名の表示
ll_rtn = UpperBound(ls_section)
FOR i = 1 TO ll_rtn
lb_1.AddItem(ls_section[i])
NEXT
付加情報：
PowerBuilder Version (記載なし)
Client SoftWare
OS (記載なし)
DBMS (記載なし)
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.