找回密码
 加入
搜索
查看: 2671|回复: 4

[AU3基础] (已解决)怎样获取INI文件每行到下拉列表

  [复制链接]
发表于 2010-11-28 15:58:25 | 显示全部楼层 |阅读模式
本帖最后由 fuldho 于 2010-11-29 09:46 编辑

本人菜鸟,求助各位大虾:

怎样获取下面"得分.ini"文件每行到下拉列表,并获取得分。

张老三  90
李小四  95
王老五  87
任小六  75
......

表达可能不清楚,如下面式样:





谢谢!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×

评分

参与人数 1金钱 +10 收起 理由
afan + 10 感谢主动将修改帖子分类为[已解决],请继续 ...

查看全部评分

发表于 2010-11-28 17:23:44 | 显示全部楼层
本帖最后由 qq342252004 于 2010-11-28 17:25 编辑
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Global $pot = ""
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 369, 70, 192, 124)
$Combo1 = GUICtrlCreateCombo("", 16, 24, 145, 25,BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
$Button1 = GUICtrlCreateButton("确定&(Y)", 184, 24, 75, 25)
$Button2 = GUICtrlCreateButton("退出&(X)", 272, 24, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$var = IniReadSectionNames(@ScriptDir&'\成绩.ini')
If @error Then 
Else
    For $i = 1 To $var[0]
        $pot = $pot & "|" & $var[$i]
    Next
    GUICtrlSetData($Combo1, StringTrimLeft ($pot, 1), $var[1]) 
EndIf

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
        Case $Button1
                        $var = IniReadSection(@ScriptDir&'\成绩.ini',GUICtrlRead($Combo1))
                        If @error Then 
                        Else
                                For $i = 1 To $var[0][0]
                                        MsgBox(0,$var[$i][0],$var[$i][1])
                                Next
                        EndIf
                Case $Button2
                        Exit
        EndSwitch
WEnd
配置文件:

[张老三]
张老三 = 90分

[李小四]
李小四 = 95分

[王老五]
王老五 = 87分

[任小六]
任小六 = 75分

评分

参与人数 2金钱 +25 贡献 +5 收起 理由
fuldho + 5 非常感谢!
afan + 25

查看全部评分

发表于 2010-11-28 23:39:09 | 显示全部楼层
楼上正解......
发表于 2010-11-29 02:48:52 | 显示全部楼层
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 213, 186, 281, 217)
$Button1 = GUICtrlCreateButton("Button1", 64, 128, 89, 33)
$Combo1 = GUICtrlCreateCombo("", 64, 24, 89, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)

$rdini = IniReadSection('data.ini', '得分')
For $i = 1 To $rdini[0][0]
        ;MsgBox(0, '', $rdini[$i][0])
        GUICtrlSetData($Combo1, $rdini[$i][0])
Next
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        $rd = GUICtrlRead($Combo1)
                        MsgBox(0, '', IniRead('data.ini', '得分', $rd, 0))

        EndSwitch
WEnd
ini信息
[得分]
张老三=90
李小四=95
王老五=87
任小六=75

评分

参与人数 1金钱 +20 收起 理由
fuldho + 20

查看全部评分

发表于 2010-12-3 00:23:11 | 显示全部楼层
正在学习INI~做个记号~
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-22 12:09 , Processed in 0.089930 second(s), 30 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表