换行问题,请帮忙
请各位大哥给解释下。配置文件内容
[网吧公告]
提示内容=本网吧收费:@LF 会员卡:1.5元/小时@LF 临时卡:2元/小时@LF 夜场卡:6元/23:00-09:00@LF请小心保管自己的贵重物品,不要把手机放在台面上,提防@LF小偷!请自行保管自己的各种虚拟帐号,如有丢失网吧概不负@LF责!
AU3程序源码
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("开机公告", 375, 269, 303, 219)
$Group9 = GUICtrlCreateGroup("开机公告", 3, 8, 369, 257)
$Edit1 = GUICtrlCreateEdit("", 11, 24, 353, 201)
GUICtrlSetData(-1, "本网吧收费:" & @CRLF & " 会员卡:1.5元/小时"& @CRLF &" 临时卡:2元/小时"& @CRLF &" 夜场卡:6元/23:00-09:00"& @CRLF & "请小心保管自己的贵重物品,不要把手机放在台面上,提防"& @CRLF &"小偷!请自行保管自己的各种虚拟帐号,如有丢失网吧概不负"& @CRLF &"责!")
$Button1 = GUICtrlCreateButton("开启", 210, 232, 43, 25, 0)
$Button2 = GUICtrlCreateButton("禁止", 262, 232, 43, 25, 0)
$Button3 = GUICtrlCreateButton("设置", 313, 232, 43, 25, 0)
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
IniWrite("SerVer.ini", "网吧公告", "是否运行", "1")
msgbox(64,"提示","设置成功")
case $button2
IniWrite("SerVer.ini", "网吧公告", "是否运行", "0")
msgbox(64,"提示","设置成功")
case $Button3
;$post1=GUICtrlRead($edit1)
$post1 = StringReplace(GUICtrlRead($edit1), @CRLF, "@LF")
IniWrite("SerVer.ini", "网吧公告","提示内容", $post1)
msgbox(64,"提示","设置成功")
EndSwitch
WEnd
[ 本帖最后由 cj4025 于 2008-6-25 01:04 编辑 ] 存入ini文件"提示内容"用字符串"@CRLF"来代替换行:
$post1 = StringReplace(GUICtrlRead($edit1), @CRLF, "@CRLF")
若要从ini文件读入"提示内容",则用@CRLF换回字符串"@CRLF"来达到显示换行的效果. 还是没明白你的意思。是不想看到输入框里有换行状态还是不想看到ini文件里有换行状态?
楼上的方法可行,如果不要字符串内的空格,请用StringStripWS 处理一下替换后的字符串。
[ 本帖最后由 顽固不化 于 2008-6-24 11:45 编辑 ] $post1 = StringReplace(GUICtrlRead($edit1), @CRLF, "@CRLF")
可以解决问题。
页:
[1]