【已解决】判断控件是否有焦点 进度条$PBS_SMOOTH样式 按钮$BS_ICON样式

pp648852

=============问题一==================

如何实现左图一样的效果？右图是我的代码演示！

=============问题二==================

使用或不使用“$PBS_SMOOTH”样式效果一样，是为什么呢？

=============问题三==================
如何在Koda里勾选打框的任意一项？难道只能到SCITE里增加？注：控件是按钮。

=============下面是代码==================
问题二代码：

 
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
Opt("TrayIconDebug",1)
#Region
$Form1 = GUICreate("Form1", 229, 107, 192, 124)
GUISetOnEvent($GUI_EVENT_CLOSE,"_GUIOnEvent")
$Progress1 = GUICtrlCreateProgress(8, 16, 214, 17, $PBS_SMOOTH)
$Progress2 = GUICtrlCreateProgress(8, 40, 214, 17, $PBS_SMOOTH)
$Button1 = GUICtrlCreateButton("暂停", 16, 72, 59, 25)
GUICtrlSetOnEvent(-1,"_GUIOnEvent")
$Button2 = GUICtrlCreateButton("退出", 152, 72, 59, 25)
GUICtrlSetOnEvent(-1,"_GUIOnEvent")
GUISetState(@SW_SHOW)
#EndRegion
While 1
For $i=0 To 100
  GUICtrlSetData($Progress1,$i)
  GUICtrlSetData($Progress2,100-$i)
  Sleep(40)
Next
Sleep(500)
WEnd
Func _GUIOnEvent()
Switch @GUI_CtrlId
  Case $GUI_EVENT_CLOSE
   Exit
  Case $Button1
   MsgBox(0,'',"test")
  Case $Button2
   
EndSwitch
EndFunc

问题一代码：

 
#include <GUIConstantsEx.au3>
$Form1 = GUICreate("输入框点击例子", 341, 208)
$Input1 = GUICtrlCreateInput("点击我", 72, 40, 153, 33)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
  Case $GUI_EVENT_PRIMARYDOWN
   $Pos = GUIGetCursorInfo($Form1)
   If $Pos[4] = $Input1 Then
    If GUICtrlRead($Input1)="点击我" Then
     GUICtrlSetData($Input1,"")
    EndIf
   Else
    If GUICtrlRead($Input1)="" Then
     GUICtrlSetData($Input1,"点击我")
    EndIf
   EndIf
   
EndSwitch
WEnd

afan

请详述标题，或分开提问

pp648852

我记得有个编辑按钮的，怎么没有了？
我只要把标题改了也可以吧？再发帖子，辛苦！

seniors

我知道问题一，三恨（应该是他）发过代码了

afan

回复 3# pp648852


    被那个破提示挡住了…
不要刷新，直接从帖子列表进入

pp648852

回复 4# seniors


    我搜索了下，没找到他的帖子，能否给个链接？3Q

seniors

回复 6# pp648852
灰色输入框演示例子
http://www.autoitx.com/forum.php ... ghlight=&page=1

pp648852

回复 5# afan


     A版是否有空帮忙解答下？在此感谢！

pp648852

回复 7# seniors


    感谢，问题一解决了！

afan

A2, 连续进度条需关闭xp主题风格，而且是蓝色的连续条，不过可以用图片做其它样式。
A3, 不用Koda，都是手写，所以不清楚

netegg

试试用_WinAPI_GetWindowLongEx不知道行不行

ym980616

我想找个焦点在INPUT控件时,对应的LABEL标签字体变色的做法