找回密码
 加入
搜索
查看: 2214|回复: 7

我想写一个网吧比赛报名程序,GUI做好了,有高手指导我写代码吗?

[复制链接]
发表于 2008-5-24 15:49:01 | 显示全部楼层 |阅读模式
我想写一个网吧比赛报名程序,GUI做好了,有高手指导我写代码吗?

我看到有个网吧比赛报名程序写的还不错,但是功能不够完善,想通过AU3仿写一个,

GUI界面都已经做好了,但是,还是不知道代码部分关于服务端和客户端连接的问题!

有哪位高手能帮帮我,不胜感激!

QQ:148798

学习AU3这么久了, 没有认识一个高手,真是惭愧!

CONFIG.ini

[游戏1]
游戏名称1=CS1.5
游戏时间1=2008-05-30

[ 本帖最后由 wj6025 于 2008-5-25 14:34 编辑 ]

本帖子中包含更多资源

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

×
 楼主| 发表于 2008-5-24 15:56:57 | 显示全部楼层
我不知道怎么读入配置文件,配置文件格式怎么写?
 楼主| 发表于 2008-5-24 15:57:18 | 显示全部楼层
#Region AutoIt3Wrapper 编译参数
#AutoIt3Wrapper_UseAnsi=y                                                                        ;编码
#AutoIt3Wrapper_Icon=                                                                                 ;图标
#AutoIt3Wrapper_OutFile=                                                                        ;输出文件名
#AutoIt3Wrapper_OutFile_Type=exe                                                        ;文件类型
#AutoIt3Wrapper_Compression=4                                                                ;压缩等级
#AutoIt3Wrapper_UseUpx=y                                                                         ;使用压缩
#AutoIt3Wrapper_Res_Comment=                                                                 ;注释
#AutoIt3Wrapper_Res_Description=                                                        ;详细信息
#AutoIt3Wrapper_Res_Fileversion=                                                        ;文件版本
#AutoIt3Wrapper_Res_FileVersion_AutoIncrement=p                                ;自动更新版本                        
#AutoIt3Wrapper_Res_LegalCopyright=                                                 ;版权
;#AutoIt3Wrapper_Res_Field=AutoIt Version|%AutoItVer%                ;自定义资源段
;#AutoIt3Wrapper_Run_Tidy=                                                   ;脚本整理
;#AutoIt3Wrapper_Run_Obfuscator=                                                      ;代码迷惑
;#AutoIt3Wrapper_Run_AU3Check=                                                                 ;语法检查
;#AutoIt3Wrapper_Run_Before=                                                                 ;运行前
;#AutoIt3Wrapper_Run_After=                                                                        ;运行后
#EndRegion AutoIt3Wrapper 编译参数设置完成
#cs ____________________________________

 AutoIt 版本: 3.2.10.0(第一版)
 脚本作者: 
        Email: 
        QQ/TM: 
 脚本版本: 
 脚本功能: 

#ce _______________脚本开始_________________
#include <GUIConstants.au3>
Opt( "RunErrorsFatal", 0 ) ;防止执行程序出错被冲止
Opt("TrayIconHide",1)  ;隐藏

#Region ### START Koda GUI section ### Form=c:\documents and settings\administrator\桌面\form1.kxf
$tenor = ProcessList(@ScriptName)
If $tenor[0][0] > 1 Then
        msgbox(0,"提示","已经有一个程序在运行",10)
        Exit
EndIf
if @OSTYPE <> "WIN32_NT" then
MsgBox(0,"提示","本程序只支持NT/2000/XP/2003系统")
exit
EndIf
If Not FileExists(@ScriptDir&"\"&"config.ini") Then 
        MsgBox(48,'提示','没有找到配置文件')
        Exit
EndIf
$lq=( IniRead(@ScriptDir&"\"&"config.ini",'参数','调用路径','') )
If FileExists($lq) Then 
        FileCopy($lq&'\config.ini',@ScriptDir&"\config.ini",1)
EndIf

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=c:\documents and settings\administrator\桌面\form1.kxf
$Form1_1 = GUICreate("网吧比赛报名程序", 613, 428, 225, 160)
GUISetIcon("E:\down\ico\QQ对战平台.ico")
$Pic1 = GUICtrlCreatePic("E:\wjserver\update\换桌面\005.jpg", 0, 0, 612, 81, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Group1 = GUICtrlCreateGroup("可参加比赛游戏", 0, 88, 289, 337)
$Label1 = GUICtrlCreateLabel("游戏名称", 8, 112, 52, 17)
$Label2 = GUICtrlCreateLabel("比赛时间", 96, 112, 52, 17)
$Label3 = GUICtrlCreateLabel("类别", 176, 112, 28, 17)
$Label4 = GUICtrlCreateLabel("详细情况", 224, 112, 52, 17)
$Radio1 = GUICtrlCreateRadio("Radio1", 8, 136, 17, 17)
$yxmc1 = GUICtrlCreateLabel("", 40, 136, 52, 17)
$Input3 = GUICtrlCreateInput("", 88, 136, 65, 21)
$bssj1 = GUICtrlCreateLabel("", 168, 136, 52, 17)
$Button1 = GUICtrlCreateButton("详情", 224, 136, 49, 20, 0)
$Button2 = GUICtrlCreateButton("我要报名", 176, 392, 73, 25, 0)
GUICtrlCreateInput("", 77, 341, 81, 21)
GUICtrlCreateInput("", 77, 367, 81, 21)
GUICtrlCreateInput("", 77, 393, 81, 21)
$Label14 = GUICtrlCreateLabel("姓名", 16, 344, 28, 17)
$Label15 = GUICtrlCreateLabel("卡号", 16, 368, 28, 17)
$Label16 = GUICtrlCreateLabel("联系电话", 8, 392, 52, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("详情", 296, 88, 177, 337)
$Label5 = GUICtrlCreateLabel("游戏名称", 304, 112, 52, 17)
$Label6 = GUICtrlCreateLabel("比赛日期", 304, 144, 52, 17)
$Label7 = GUICtrlCreateLabel("比赛规则", 305, 171, 52, 17)
GUICtrlCreateInput("", 360, 112, 89, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
GUICtrlCreateInput("", 360, 143, 89, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input1 = GUICtrlCreateInput("", 306, 192, 153, 100)
GUICtrlSetState(-1, $GUI_DISABLE)
$Label8 = GUICtrlCreateLabel("奖品", 304, 296, 28, 17)
$Input2 = GUICtrlCreateInput("", 306, 316, 153, 100)
GUICtrlSetState(-1, $GUI_DISABLE)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("最近排名", 480, 88, 129, 337)
$Label9 = GUICtrlCreateLabel("NO", 488, 104, 20, 17)
$Label10 = GUICtrlCreateLabel("角色名称", 520, 104, 52, 17)
$Label11 = GUICtrlCreateLabel("得分", 576, 104, 28, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Button1
Case $Button2
Case $Input1
Case $Input2
EndSwitch
WEnd

$yxmc1=IniRead(@ScriptDir &"\config.ini","游戏1","游戏名称1","")
$bssj1=IniRead(@ScriptDir &"\config.ini","游戏1","游戏时间1","")


[ 本帖最后由 wj6025 于 2008-5-24 15:58 编辑 ]
 楼主| 发表于 2008-5-24 15:59:38 | 显示全部楼层
为什么  “游戏1”内的配置读不进去?能指导指导吗?
发表于 2008-5-24 17:24:38 | 显示全部楼层
顶楼上的热心人士
 楼主| 发表于 2008-5-24 17:28:36 | 显示全部楼层
可是还是读不出来,不知道为什么,谁能给个解决的方法
 楼主| 发表于 2008-5-24 18:47:47 | 显示全部楼层
[游戏1]
游戏名称1=CS1.5
游戏时间1=2008-05-30
 楼主| 发表于 2008-5-24 21:26:25 | 显示全部楼层
有人帮我看看吗???????????
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-5-17 18:37 , Processed in 0.076869 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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