jycel 发表于 2009-3-17 23:06:59

［已解决］怎样读取配置文件内容显示到GUI

在客户机做了一个工具集合，上面加了一个滚动公告，内容是从服务器共享配置文件上面读取的，于是写了一个公告管理！这个默认我想在点击后，从备份配置文件中读取到GUI上面，不知用那个函数
截图和代码如下，

#include <GUIConstants.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <EditConstants.au3>
#Include <GuiStatusBar.au3>

Opt("GUIOneventMode",1)

Dim $Button

$WinMain= GUICreate("公告管理", 180, 310)            ;创建主窗口

GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")

;$Button= GUICtrlCreateGroup("公告管理系统",2, 2, 168,280);显示子窗口
$Button= GUICtrlCreateGroup("公告标题",5, 5, 169, 50);显示子窗口
$Button= GUICtrlCreateGroup("公告内容[不得超过166字符]",5, 60, 169, 200);显示子窗口

$Button= GUICtrlCreateInput("最新公告",10, 18, 158, 30,$ES_MULTILINE);显示子窗口
$Button= GUICtrlCreateInput("本程序已集合在线影院、电视直播、搜索等工具,如果您对本程序有任何见意请点击QQ留言,欢迎大家提出宝贵意见,最后祝大家上网愉快!",10, 75, 158, 180,$ES_MULTILINE);显示子窗口

$Button= GUICtrlCreateButton("默认",5, 265, 50, 25);显示子窗口
$Button= GUICtrlCreateButton("保存",60, 265, 50, 25);显示子窗口
$Button= GUICtrlCreateButton("退出",120, 265, 50, 25);显示子窗口


$StatusBar1 = _GUICtrlStatusBar_Create($WinMain)
Dim $StatusBar1_PartsWidth =

$S0 =""
$S1 =""


$S2="【飛翔網絡】公告系统 BY-Jycel"
_GUICtrlStatusBar_SetParts($StatusBar1, $StatusBar1_PartsWidth)
_GUICtrlStatusBar_SetText($StatusBar1, $S2, 2)
_GUICtrlStatusBar_SetText($StatusBar1, $S1, 1)
_GUICtrlStatusBar_SetText($StatusBar1, $S0, 0)
_GUICtrlStatusBar_SetMinHeight($StatusBar1, 15)

GUISwitch($WinMain)                            ;切换当前窗口到主窗口
GUISetState(@SW_SHOW)   

For $I = 22 to 0 Step -1
      GUICtrlSetOnEvent($Button[$I],"GUICtrlMsg") ;注册总共的六个按钮点击事件到函数 GUICtrlMsg
                                                    ;请区分 GUISetOnEvent 和 GUICtrlSetOnEvent的区别
Next
                                                                                               
While 1
       
WEnd
Func GUICtrlMsg()
      Switch @GUI_CtrlId;选择事件 ID 或 控件 ID
                Case $GUI_EVENT_CLOSE;如果点下的是$GUI_EVENT_CLOSE(关闭)
                        GUISetState(@SW_HIDE,@GUI_WinHandle);隐藏产生事件的窗口
                                case $Button       
                                        IniRead("H:\Update\configbak.ini","公告","标题","最新公告")
                                        IniRead("H:\Update\configbak.ini","内容","内容","本程序已集合在线影院、电视直播")
                                Case $Button
                                        $bt= GUICtrlRead($Button)
                                        $lr= GUICtrlRead($Button)
                                        IniWrite("H:\Update\config.ini","公告","标题",'"'&$bt&'"')
                                        IniWrite("H:\Update\config.ini","内容","内容",'"'&$lr&'"')
                                        MsgBox(64,"成功","保存成功")
                                Case $Button
                         _exit()
                                          
      EndSwitch
EndFunc

Func _Exit()


Exit

EndFunc



[ 本帖最后由 jycel 于 2009-3-17 23:30 编辑 ]

jycel 发表于 2009-3-17 23:29:28

QQ群到答案，多谢叁恨居士指点！inireda-guictrlsetdata函数

menfan 发表于 2009-3-18 09:11:57

原帖由 jycel 于 2009-3-17 23:29 发表 http://www.autoitx.com/images/common/back.gif
QQ群到答案，多谢叁恨居士指点！inireda-guictrlsetdata函数

QQ群?多少号呢？

jycel 发表于 2009-3-18 15:42:41

自由天空SKYfree出的教材上面有！QQ有密保卡，现在在外面，看不了！不好意思
页: [1]
查看完整版本: ［已解决］怎样读取配置文件内容显示到GUI