[SOLVED] Number of lines in a EditBox?

[johnmcloud]

Hi guys, i have this script:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$Form1 = GUICreate("Form1", 248, 180)
$Edit = GUICtrlCreateEdit("", 8, 8, 233, 121)
$Button = GUICtrlCreateButton("Verify", 8, 136, 233, 33)
GUISetState(@SW_SHOW)

GUICtrlSetData($Edit, "Number of lines (0)" & @CRLF & "Test1" & @CRLF & "Test2")

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
  Case $Button
   $FinalList = StringSplit(GUICtrlRead($Edit), @CR)
   For $i = 2 To $FinalList[0]
    MsgBox(64, "Verify", $FinalList[$i])
   Next
EndSwitch
WEnd

I can't find a way for count the number of lines in a EditBox. I have see:

_FileCountLines()

FileReadLine

But i can't apply directy to a EditBox without write them on a file and then EditBox read it.

How to solve this?

Thanks

Edited May 5, 2012 by johnmcloud

[water]

Doesn't $FinalList[0] give you the number of lines? If not try to use

$FinalList = StringSplit(GUICtrlRead($Edit), @CR, 1)

[johnmcloud]

Yes, but there is a problem:

How to write the number of files without losing the data. There is a way to write the first line of a editbox without lose Test1 e Test2?

[water]

FileWrite("C:temptest.txt", $FinalList[1])?

[johnmcloud]

I don't want to write on a file

if I wanted to write to the file I used _FileCountLines()

The goal is:

1) GUICtrlSetData write the data ( Test1 e Test2 )

2) I'll read the value and check the number of line with $FinalList[0]

3) GUICtrlSetData write the number of files ( $FinalList[0] ) and the data ( Test1 e Test2 ) on the EditBox [That's the problem]

All this at startup of the GUI

Edited May 5, 2012 by johnmcloud

[johnmcloud]

lol, i have the solution by myself:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$Form1 = GUICreate("Form1", 248, 180)
$Edit = GUICtrlCreateEdit("", 8, 8, 233, 121)
$Button = GUICtrlCreateButton("Verify", 8, 136, 233, 33)
GUISetState(@SW_SHOW)

$Test = "Test1" & @CRLF & "Test2" & @CRLF & "Test3" & @CRLF & "Test4"
GUICtrlSetData($Edit, $Test)
$FinalList = StringSplit(GUICtrlRead($Edit), @CR, 1)
GUICtrlSetData($Edit, "Number of lines ( " & $FinalList[0] & ")" & @CRLF & $Test)

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
  Case $Button
   $FinalList = StringSplit(GUICtrlRead($Edit), @CR)
   For $i = 2 To $FinalList[0]
    MsgBox(64, "Verify", $FinalList[$i])
   Next
EndSwitch
WEnd

Thanks water for support

Edited May 5, 2012 by johnmcloud

[UEZ]

What about _GUICtrlEdit_GetLineCount() function?

Br,

UEZ