论坛改版，不支持高亮代码，也不支持IE复制了？
1、看不到以前的那种高亮代码了2、不支持IE复制代码了好像，点击复制没反应.....
3、有时复制变成莫名其妙的乱码。
http://www.autoitx.com/data/attachment/forum/201808/21/205907axbab67baokak6tm.png
不对呀.正常呀. copy正常呀.
#include<array.au3>
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("简单的Combo三级联动by:绿色风简易工作室http://www.jianyiit.com", 868, 177, 192, 132)
$Combo1 = GUICtrlCreateCombo("Combo1", 8, 136, 161, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL))
$Combo2 = GUICtrlCreateCombo("Combo2", 192, 136, 177, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL))
$Combo3 = GUICtrlCreateCombo("Combo3", 400, 136, 185, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL))
$Input1 = GUICtrlCreateInput("我爱绿色风,大家绿色风", 616, 136, 217, 24)
$Label1 = GUICtrlCreateLabel("省 级", 56, 104, 99, 20)
$Label2 = GUICtrlCreateLabel("市 级", 240, 104, 99, 20)
$Label3 = GUICtrlCreateLabel("县／区 级", 448, 104, 99, 20)
$Label4 = GUICtrlCreateLabel("对应天气网的ＩＤ编号", 634, 104, 150, 20)
$Button1 = GUICtrlCreateButton(">>刷下存在，简单的三级联动<<", 88, 8, 635, 57)
GUICtrlSetFont(-1, 19, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Dim $ini = "天气数据.dat"
_Cob0() ;省级目录
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Combo1 ;一级
_Cob1()
Case $Combo2 ;二级
_cob2()
Case $Combo3 ;三级
_cob3() ;联动到天气ID
Case $Button1
ShellExecute("iexplore.exe", "www.jianyiit.com")
EndSwitch
WEnd
Func _Cob0() ;最省一级目录
Local $arr = IniReadSection($ini, "省级")
Local $str = ""
For $i = 1 To $arr
$str = $str & "|" & $arr[$i]
Next
GUICtrlSetData($Combo1, $str, $arr)
_Cob1();联动下一级
EndFunc ;==>_Cob0
Func _Cob1();取二级
Local $str = GUICtrlRead($Combo1)
Local $str2 = IniRead($ini, "省级", $str, "")
Local $arr = StringSplit($str2, "|")
GUICtrlSetData($Combo2, "")
GUICtrlSetData($Combo2, $str2, $arr)
_cob2();联动下一级
EndFunc ;==>_Cob1
Func _cob2()
Local $str = GUICtrlRead($Combo2) ;取地区
Local $arr = IniReadSection($ini, $str)
$str = ""
For $i = 1 To $arr
$str = $str & "|" & $arr[$i]
Next
GUICtrlSetData($Combo3, $str, $arr) ;设置地区到 COB3
_cob3();联动下一级
EndFunc ;==>_cob2
Func _cob3()
Local $str0 = GUICtrlRead($Combo2);市级
Local $str1 = GUICtrlRead($Combo3) ;区县级
Local $str2 = IniRead($ini, $str0, $str1, "")
GUICtrlSetData($input1, $str2)
EndFunc ;==>_cob3
复制代码很简单的呀.
先点击 终点 字符串 位置
再 按住CTRL键
再移动滚动条 到上面,点击 你的起始字段串位置
再按CTRL + C 不就OK的了.
点击三下就全选了，剩下的就OK了吧 复制代码，那个按键没有了。。 鼠标右键有复制啊
顽固不化 发表于 2018-8-31 10:03
复制代码，那个按键没有了。。
我这也没那个按钮了 本帖最后由 cashiba 于 2018-8-31 20:49 编辑
绿色风 发表于 2018-8-30 23:46
复制代码很简单的呀.
先点击 终点 字符串 位置
以前点个复制，就ok了，现在这样的复制方法弊端不少，复制出来的代码
第一是可能出现顶楼的那种乱码
第二是格式不好，中间有大量空白隔行。
这首页的轮换图片也有溢出......
不兼容IE浏览器了？
cashiba 发表于 2018-8-31 20:48
这首页的轮换图片也有溢出......
不兼容IE浏览器了？
应该浏览器的事
afan 发表于 2018-8-31 19:21
我这也没那个按钮了
换了个高亮代码的引擎.带复制的那个不会搞.主要是现在的这个好改成通用以前的 标签
只能称临时用用
绿色风 发表于 2018-9-1 13:04
换了个高亮代码的引擎.带复制的那个不会搞.主要是现在的这个好改成通用以前的 标签
只能称临时用 ...
辛苦了，能用就行~~~~~ 做了个小工具，可以试试 ~
http://www.autoit3.cn/thread-59558-1-1.html 本帖最后由 cashiba 于 2018-9-2 10:16 编辑
afan 发表于 2018-9-1 13:53
做了个小工具，可以试试 ~
http://www.autoit3.cn/thread-59558-1-1.html还有一个老问题，比喻登录进论坛来后，浏览到这个帖子，然后点A大发的这个链接，结果还要再登录一次（如下）......
是要把cookie改成永不过期才行？
页:
[1]
2