病毒专收员 发表于 2009-11-26 11:51:33

如何能控制 GUICtrlCreateEdit 滚动条,移动到最顶或者最底 内有图

本帖最后由 病毒专收员 于 2009-11-26 18:10 编辑

请教下,如何能控制 GUICtrlCreateEdit 滚动条,移动到最顶或者最底.如下图!

maxkingmax 发表于 2009-11-26 12:19:05

本帖最后由 maxkingmax 于 2009-11-26 12:20 编辑

帮顶一下
焦点
CTRL+HOME 开关
CTRL+END 结尾

病毒专收员 发表于 2009-11-26 12:32:49

:face (29): 有没更精确的办法?

afan 发表于 2009-11-26 12:34:34

貌似最简单就这样

bing614 发表于 2009-11-26 12:54:26

使用
_GUICtrlRichEdit_ScrollToCaret
_GUICtrlRichEdit_ScrollLines
_GUICtrlRichEdit_ScrollLineOrPage

水木子 发表于 2009-11-26 13:23:22

楼上的UDF函数更方面。:face (20):

afan 发表于 2009-11-26 14:16:00

我这没这富文本操作的udf，不知道是否方便

水木子 发表于 2009-11-26 17:39:35

本帖最后由 水木子 于 2009-12-22 10:30 编辑

嘿嘿！随便写了一个:face (27):#include <GuiEdit.au3>
#include <GuiStatusBar.au3>
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <ScrollBarConstants.au3>

$Form1 = GUICreate("Form1", 320, 300)
$List1 = GUICtrlCreateEdit("", 10, 10, 300, 200)
$Button1 = GUICtrlCreateButton("向上翻滚", 20, 230, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("向下翻滚", 120, 230, 75, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("暂停", 220, 230, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)

For $i = 1 To 100       
        _GUICtrlEdit_AppendText($List1 ,$i&@LF)
Next
Send("^{HOME}")

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case -3
                        Exit
                Case $Button1
                        AdlibUnRegister( "xia" )
                        AdlibRegister('shang' ,100)
                Case $Button2
                        AdlibUnRegister( "shang" )
                        AdlibRegister('xia' ,100)               
                Case $Button3
                        AdlibUnRegister( "shang" )
                        AdlibUnRegister( "xia" )
        EndSwitch
WEnd

Func shang()       
        _GUICtrlEdit_Scroll($List1, $SB_LINEUP)
EndFunc       

Func xia()       
        _GUICtrlEdit_Scroll($List1, $SB_LINEDOWN)
EndFunc       

病毒专收员 发表于 2009-11-26 18:10:15

:face (23):感谢大家的支持,问题解决.!

styledream 发表于 2009-11-26 21:26:26

有趣的提问！
学习了！

zhenglei 发表于 2009-12-12 17:53:33

GUICtrlCreateEdit 滚动条,移动到最顶或者最底

ragnada 发表于 2010-5-27 14:20:10

還有這一招喔:face (9):

a13701512730 发表于 2011-5-21 21:31:17

学习了，，
页: [1]
查看完整版本: 如何能控制 GUICtrlCreateEdit 滚动条,移动到最顶或者最底 内有图