Forgot how to add strings together

[Damastah]

func find()
    $search = FileFindFirstFile("*.jpg*")  

; Check if the search was successful
If $search = -1 Then
    MsgBox(0, "Error", "No files/directories matched the search pattern")
    Exit
EndIf

While 1
    $file = FileFindNextFile($search) 
    
;MsgBox(0, "", $filelist)
    If @error Then ExitLoop
    
    MsgBox(4096, "File:", $file)
    $filelist += ", " & $file                                             <--Trying to add the strings here. Does not work
WEnd

; Close the search handle
FileClose($search)

I'm basically trying to get a string with a list of .jpg files in the directory delimited by commas.

[enaiman]

$filelist &= ", " & $file

[Valuater]

Maybe...

Local $filelist

MsgBox(4096, "File:", $file)
$filelist &= $file & @CRLF

8)

EDIT: for a comma delimited list, enaiman has it!

Edited January 21, 2009 by Valuater

[SpookMeister]

Or the long way, if you forget the shorthand version...

$filelist = $fileslist & ", " & $file

[Damastah]

Thank you all. Problem solved.

[monoceres]

Real men don't use the '&' operator

MsgBox(0,"",ManlyHardcoreStringConjugating("Good"," Night"))

Func ManlyHardcoreStringConjugating($s1,$s2)
    $struct=DllStructCreate("wchar["&StringLen($s1)+StringLen($s2)&"]")
    DllStructSetData($struct,1,$s1)
    DllStructSetData(DllStructCreate("wchar["&StringLen($s2)&"]",DllStructGetPtr($struct)+StringLen($s1)*2),1,$s2)
    Return DllStructGetData($struct,1)  
EndFunc

[AdmiralAlkex]

@monoceres

now you have to make all your future scripts like that (or are you not a real man? )

[Valuater]

Real men don't use the '&' operator

Real men don't have computers....

8)

[monoceres]

@monoceres

now you have to make all your future scripts like that (or are you not a real man? )

Of course, my way is the only way.

Real men don't have computers....

8)

Tell me about it, I've never even used a computer. I write all my scripts on a theoretical basis and have a friend post them to this forum.

[Paulie]

Real men don't use the '&' operator

MsgBox(0,"",ManlyHardcoreStringConjugating("Good"," Night"))

Func ManlyHardcoreStringConjugating($s1,$s2)
    $struct=DllStructCreate("wchar["&StringLen($s1)+StringLen($s2)&"]")
    DllStructSetData($struct,1,$s1)
    DllStructSetData(DllStructCreate("wchar["&StringLen($s2)&"]",DllStructGetPtr($struct)+StringLen($s1)*2),1,$s2)
    Return DllStructGetData($struct,1)  
EndFunc

Monoceres divides by zero!

$struct=DllStructCreate("wchar["&StringLen($s1)+StringLen($s2)&"]")