..

[ArxBzFhblxphS]

Edited August 9, 2009 by Thanubis

[martin]

I have this GUI with an edit control. I want to make absolutely sure that any data I send to it is going to be added to the end of the existing data. The problem is that data is always added at the carat point.

Is it possible to disable the edit control so it can't be clicked, without disabling the scroll bar so it can still be scrolled?

If not, is there a way to move the carat to the end position before the data is set?

#include <Array.au3>
 Opt("MustDeclareVars", 1)
 
 GUICreate("Test", 290, 264)
 Local $button = GUICtrlCreateButton("Button", 204, 39, 75, 25, 0x0301);$BS_CENTER + $BS_DEFPUSHBUTTON
 Local $infobox = GUICtrlCreateEdit("Line 1" & @CRLF & _
         "Line 2" & @CRLF & "Line 3" & @CRLF & _
         "Line 4" & @CRLF & "Line 5" & @CRLF & _
         "Line 6" & @CRLF & "Line 7" & @CRLF & _
         "Line 8" & @CRLF & "Line 9" & @CRLF & _
         "Line 10" & @CRLF & "Line 11" & @CRLF & _
         "Line 12" & @CRLF & "Line 13" & @CRLF & _
         "Line 14" & @CRLF & "Line 15", 10, 74, 270, 180, 0x200840);$WS_VSCROLL + $ES_READONLY + $ES_AUTOVSCROLL
 
 GUISetState(@SW_SHOW)
 Local $msg = GUIGetMsg()
 While $msg <> -3
     $msg = GUIGetMsg()
     If $msg = $button Then
         For $X = 16 To 30
             GUICtrlSetData($infobox, @CRLF & "Line " & $X, GUICtrlRead($infobox))
         Next
     EndIf
 WEnd

Maybe

#include <Array.au3>
#include <guiedit.au3>
Opt("MustDeclareVars", 1)

GUICreate("Test", 290, 264)
Local $button = GUICtrlCreateButton("Button", 204, 39, 75, 25, 0x0301);$BS_CENTER + $BS_DEFPUSHBUTTON
Local $infobox = GUICtrlCreateEdit("Line 1" & @CRLF & _
        "Line 2" & @CRLF & "Line 3" & @CRLF & _
        "Line 4" & @CRLF & "Line 5" & @CRLF & _
        "Line 6" & @CRLF & "Line 7" & @CRLF & _
        "Line 8" & @CRLF & "Line 9" & @CRLF & _
        "Line 10" & @CRLF & "Line 11" & @CRLF & _
        "Line 12" & @CRLF & "Line 13" & @CRLF & _
        "Line 14" & @CRLF & "Line 15", 10, 74, 270, 180, 0x200840);$WS_VSCROLL + $ES_READONLY + $ES_AUTOVSCROLL

GUISetState(@SW_SHOW)
Local $msg = GUIGetMsg()
While $msg <> -3
    $msg = GUIGetMsg()
    If $msg = $button Then
        For $X = 16 To 30
            _GUICtrlEdit_AppendText($infobox, @CRLF & "Line " & $X)
           ;GUICtrlSetData($infobox, @CRLF & "Line " & $X, GUICtrlRead($infobox))
        Next
    EndIf
WEnd

[JackDinn]

well you could always jump into the #Include file , nick the func you want _GUICtrlEdit_AppendText() and paste it as a func in your script. that way you dont need to #include all the rest of the GuiEdit.au3 content.

i know its exactly NOT what your looking for but another way maybe is _GUICtrlEdit_SetSel ($infobox,999,999) just before your GUICtrlSetData($infobox, @CRLF & "Line " & $X, GUICtrlRead($infobox))

[JackDinn]

OMFG, JackDinn, you are a freaking genius!

well, appreciated

maybe an even better "fudge" would be to put

Send("{down " & ControlCommand($Hgui, $infobox, "Edit1", "GetLineCount", "") & "}")

before your for next loop, you would need to give the GUI a handle though.

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>
Opt("MustDeclareVars", 1)
Global $Hgui = GUICreate("Test", 290, 264)
Global $lcount
Local $button = GUICtrlCreateButton("Button", 204, 39, 75, 25, 0x0301);$BS_CENTER + $BS_DEFPUSHBUTTON
Local $infobox = GUICtrlCreateEdit("Line 1" & @CRLF & _
        "Line 2" & @CRLF & "Line 3" & @CRLF & _
        "Line 4" & @CRLF & "Line 5" & @CRLF & _
        "Line 6" & @CRLF & "Line 7" & @CRLF & _
        "Line 8" & @CRLF & "Line 9" & @CRLF & _
        "Line 10" & @CRLF & "Line 11" & @CRLF & _
        "Line 12" & @CRLF & "Line 13" & @CRLF & _
        "Line 14" & @CRLF & "Line 15", 10, 74, 270, 200);$WS_VSCROLL + $ES_READONLY + $ES_AUTOVSCROLL
GUISetState(@SW_SHOW)
$lcount = ControlCommand($Hgui, $infobox, "Edit1", "GetLineCount", "")
Local $msg = GUIGetMsg()
While $msg <> -3
    $msg = GUIGetMsg()
    If $msg = $button Then
        Send("{down " & ControlCommand($Hgui, $infobox, "Edit1", "GetLineCount", "") & "}")
        For $X = 16 To 30
            GUICtrlSetData($infobox, @CRLF & "Line " & $X, GUICtrlRead($infobox))
        Next
    EndIf
WEnd

[JackDinn]

all good stuff