_GetLine

[jaenster]

$string = "Hello"&@crlf&"My name"&@crlf&"is"&@crlf&"jaenster" ; Create a string with 4 line's
msgbox(0,"Get the line ",_getline($string,3));Get line number 3 of the string



#cs===============================================================================

 Function Name:     _GetLine()
 Description:       Get a line of a multie lined string
 Parameter(s):      $read - The string from we get the line
                    $c - Line number
 Requirement(s):    AutoIT 3.*
 Return Value(s):   On success Line $c
                    On error -1
 Error(s):          @error = 1 : if you want a line that not exits
 Author(s):         jan "jaenster"

===============================================================================
#ce
func _GetLine($read,$c)
        $read = stringsplit($read,@cr)
        for $i = 1 to $read[0]
            if asc(stringmid($read[$i],1)) = 10 then
                $read[$i] = stringmid($read[$i],stringlen($read[$i])-(stringlen($read[$i])-2))
            endif
        next
        if $read[0] < $c then
            seterror(1)
            return -1
        endif
        return $read[$c]
endfunc

Thanks for watching

[deano]

thank you, i found a use for this

[RazerM]

This can be done in 3 lines:

Func _GetLineEx($sText, $iLine)
    $lines = StringSplit(StringStripCR($sText), @LF)
    If $iLine < $iLine Then Return SetError(1, 0, -1)
    Return $lines[$iLine]
EndFunc   ;==>_GetLineEx

[jvanegmond]

All this talking about lines makes me hungry.

[this-is-me]

Shorter:

Func _GetLine($sText, $iLine)
    $lines = StringSplit($sText, @CRLF, 1)
    If $lines[0] < $iLine Then Return SetError(1, 0, -1)
    Return $lines[$iLine]
EndFunc

[RazerM]

@this-is-me

that won't work if $sText is delimited by by only @LF.

[jaenster]

Yup.

But do someone like it