howto sort my autoit output

[unixu]

hi,

i got a small problem in sorting my autoit output

my output looks like this

"bildungsstufe",

"agi",

"def",

"att",

"def",

"agi"

i want to sort the output to something like this :

word1 word2 word3

word4 word5 word6

word7 word8 word9

instead of :

word1

word2

word3

a.s.o

is there a way to do that because the output is send to a gui.

Edited March 25, 2010 by unixu

[BrettF]

Ehhhhhh what now? Sort the output of what? Post your code. We aint no mind readers or something.

[unixu]

i tried with a for function which schould do a linebreak every third word.

didn't worked out.

here is my example i tried but its not creating any files.

#include<string.au3>

$content = FileRead("test.txt")
$newline = StringSplit($content,",")


for $i=0 to UBound($newline[0]) -1
If $i == $newline[0]/$i Then
    FileWrite("newcontent.txt", $newline[$i] & @CRLF)
Else
    FileWrite("newcontent.txt", $newline[$i] & "    ")
EndIf
Next

content of test.txt is

att,
def,
att,
def,
agi,
att,
agi,
att,

Edited March 25, 2010 by unixu

[Beege]

This statment is wrong

for $i=0 to UBound($newline[0]) -1

Should say..

for $i=0 to $newline[0]

[Beege]

Also to quickly check if fileread() and Stringsplit() worked liked you expected you could use _Arraydisplay() to view the array.

#include<string.au3>  
#include<array.au3> 
$content = FileRead("test.txt") 
$newline = StringSplit($content,",")
_Arraydisplay($newline)

[99ojo]

Hi,

example:

For $i = 1 to 99
    If Mod ($i, 3) = 0 Then
        ConsoleWrite ($i & @CRLF)
    Else
        ConsoleWrite ($i & ", ")
    EndIf
Next

;-))

Stefan

Edited March 25, 2010 by 99ojo

[unixu]

dear beege my fileread worked as expected

edit: Dear 99ojo thx your example worked perfect for my needs

Edited March 25, 2010 by unixu

[Malkey]

Another example.

; Modified from
; http://www.autoitscript.com/forum/index.php?showtopic=101594&view=findpost&p=722113

Local $sStr = "att," & @CRLF & _
        "def," & @CRLF & _
        "att," & @CRLF & _
        "def," & @CRLF & _
        "agi," & @CRLF & _
        "att," & @CRLF & _
        "agi," & @CRLF & _
        "att,"
; OR
;Local $sStr = FileRead("test.txt")

MsgBox(0, 'Display 2D array style (Not an array)', _
        "From: " & @CRLF & $sStr & @CRLF & @CRLF & "Display 3 columns." & @CRLF & _
        " Result: " & @CRLF & _StringDisplayRE($sStr, 3, " ") & @CRLF)


Func _StringDisplayRE($sStr, $iNumOfCol = 0, $SpaceType = @TAB)
    Return StringRegExpReplace(StringRegExpReplace($sStr, "(.*[^\v])(?:\v+)", "${1}" & $SpaceType), _
            "((.*?" & $SpaceType & "){" & $iNumOfCol & "})", "${1}" & @CRLF)
EndFunc ;==>_StringDisplayRE

[GEOSoft]

This statment is wrong

for $i=0 to UBound($newline[0]) -1

Should say..

for $i=0 to $newline[0]

Or

for $i=0 to UBound($newline) -1