kxing 发表于 2012-8-11 17:41:07

[已解决]求助自动换行的问题

本帖最后由 kxing 于 2012-8-11 21:27 编辑

请教下我用_guictrledit_create创建的控件怎么才能实现和记事本那样的自动换行呢?
也就是不用点水平滚动条就可以看到内容。
当然了,在点取消也可以还原到非自动换行的状态。
麻烦高人赐教,多谢!!

lpxx 发表于 2012-8-11 20:05:46

论坛搜索自动换行

kxing 发表于 2012-8-11 21:26:58

多谢,原来样式问题....

kxing 发表于 2012-8-11 22:16:04

为何下面的编辑框没办法切换自动换行或不自动换呢?
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <guiedit.au3>
#include <string.au3>

$Form1 = GUICreate("", 190, 240)
$Edit1 = _GUICtrlEdit_Create($Form1,"", 0, 0, 190, 190)
$Button1 = GUICtrlCreateButton("显示", 10, 200, 150, 30)
GUISetState(@SW_SHOW)

local $flag=0

While 1
      $nMsg = GUIGetMsg()
      Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
if $flag then
$flag=1
else
$flag=0
endif
_setautoline($Edit1,$flag)
      EndSwitch
WEnd

Func _SetAutoLine($hEdit,$flag=0)
if $flag=0 then;不自动换行
guictrlsetstyle($hEdit,bitor($ES_MULTILINE, $ES_WANTRETURN))
else;自动换行
guictrlsetstyle($hEdit,bitor($ES_MULTILINE, $ES_WANTRETURN, $WS_VSCROLL, $WS_HSCROLL, $ES_AUTOVSCROLL, $ES_AUTOHSCROLL))
endif
EndFunc;setautoline
页: [1]
查看完整版本: [已解决]求助自动换行的问题