ListView Listing help

[B3TA_SCR1PT3R]

so im trying 2 make a media player that list all .mp3's in my music folder

and im using the GuiCtrlCreateListView 2 do it so u can select the song u want

heres wat i have

#NoTrayIcon
#include <GuiConstants.au3>


GuiCreate("Mizedia-Plizaya",500,300)

$filenumber = DirGetSize(@MyDocumentsDir & "\My Music\",1)





GuiCtrlCreateLabel("Media Files...(" & $filenumber[1] & ")",300,250)


$list = GuiCtrlCreateListView("Title|Artist",5,10,490,185, $LVS_SINGLESEL + $LVS_EX_FULLROWSELECT + $LVS_SHOWSELALWAYS)
$list_song = GuiCtrlCreateListViewItem("",$list)


$search = FileFindFirstFile(@MyDocumentsDir & "\My Music\*.*")



GuiSetState()
While 1
        $msg = GuiGetMsg()
            
        If $msg = $GUI_EVENT_CLOSE Then Exit
        
        $file_songs = FileFindNextFile($search)
        $sort = StringReplace($file_songs, ".mp3", "|")
        GuiCtrlSetData($list_song, $sort)

WEnd 
FileClose($search)

How Do i make it 2 where it will show all files 1 under the other

right now it shows 1 then clears the list then shows the next

so at the end i only see the last song in my music

Do i need 2 make a Func for this???

(this isnt the whole script by the way im gona add buttons and watnot)

Edited July 27, 2005 by B3TA_SCR1PT3R

[GaryFrost]

You were setting the data instead of adding new items:

expandcollapse popup

#NoTrayIcon
#include <GuiConstants.au3>


GUICreate("Mizedia-Plizaya", 500, 300)

$filenumber = DirGetSize(@MyDocumentsDir & "\My Music\", 1)





GUICtrlCreateLabel("Media Files...(" & $filenumber[1] & ")", 300, 250)


$list = GUICtrlCreateListView("Title|Artist", 5, 10, 490, 185, $LVS_SINGLESEL + $LVS_EX_FULLROWSELECT + $LVS_SHOWSELALWAYS)
;~ $list_song = GuiCtrlCreateListViewItem("",$list)


$search = FileFindFirstFile(@MyDocumentsDir & "\My Music\*.mp3")



GUISetState()
While 1
    $file_songs = FileFindNextFile($search)
    If @error Then ExitLoop
    ConsoleWrite($file_songs & @LF)
    If $file_songs <> "." And $file_songs <> ".." Then
        $sort = StringReplace($file_songs, ".mp3", "|")
        GUICtrlCreateListViewItem($sort, $list)
    EndIf
    
WEnd
FileClose($search)

While 1
    $msg = GUIGetMsg()
    
    If $msg = $GUI_EVENT_CLOSE Then Exit
    
WEnd

Gary

[B3TA_SCR1PT3R]

You were setting the data instead of adding new items:

#NoTrayIcon
#include <GuiConstants.au3>
GUICreate("Mizedia-Plizaya", 500, 300)

$filenumber = DirGetSize(@MyDocumentsDir & "\My Music\", 1)
GUICtrlCreateLabel("Media Files...(" & $filenumber[1] & ")", 300, 250)
$list = GUICtrlCreateListView("Title|Artist", 5, 10, 490, 185, $LVS_SINGLESEL + $LVS_EX_FULLROWSELECT + $LVS_SHOWSELALWAYS)
;~ $list_song = GuiCtrlCreateListViewItem("",$list)
$search = FileFindFirstFile(@MyDocumentsDir & "\My Music\*.mp3")
GUISetState()
While 1
    $file_songs = FileFindNextFile($search)
    If @error Then ExitLoop
    ConsoleWrite($file_songs & @LF)
    If $file_songs <> "." And $file_songs <> ".." Then
        $sort = StringReplace($file_songs, ".mp3", "|")
        GUICtrlCreateListViewItem($sort, $list)
    EndIf
    
WEnd
FileClose($search)

While 1
    $msg = GUIGetMsg()
    
    If $msg = $GUI_EVENT_CLOSE Then Exit
    
WEnd

Gary

<{POST_SNAPBACK}>

does this show the files in the list on ur comp?

cuz i copyed the code and it seems like its working but it just shows blank items

and then (for some odd reason) the last song shows up....

???help again plz???

[GaryFrost]

Ok, had an if that wasn't needed.

#NoTrayIcon
#include <GuiConstants.au3>
GUICreate("Mizedia-Plizaya", 500, 300)

$filenumber = DirGetSize(@MyDocumentsDir & "\My Music\", 1)
GUICtrlCreateLabel("Media Files...(" & $filenumber[1] & ")", 300, 250)
$list = GUICtrlCreateListView("Title|Artist", 5, 10, 490, 185, BitOR($LVS_SINGLESEL, $LVS_EX_FULLROWSELECT, $LVS_SHOWSELALWAYS))
;~ $list_song = GuiCtrlCreateListViewItem("",$list)
$search = FileFindFirstFile(@MyDocumentsDir & "\My Music\*.mp3")
GUISetState()
While 1
    $file_songs = FileFindNextFile($search)
    If @error Then ExitLoop
    $sort = StringReplace($file_songs, ".mp3", "|")
    GUICtrlCreateListViewItem($sort & "| ", $list)
WEnd
FileClose($search)

While 1
    $msg = GUIGetMsg()
    
    If $msg = $GUI_EVENT_CLOSE Then Exit
    
WEnd

[B3TA_SCR1PT3R]

yay!!!

it worked

thanx alot

\\\\\EDIT\\\\\\\\\

the file name in my music on all files it says "song name" - "Artist"

how would i split the file name where the "-" and make half of it go to the artist colum??

i tried stringsplit but i dont know how to assign a variable 2 the other half of the split string???

help me again plzzzzz

Edited July 28, 2005 by B3TA_SCR1PT3R

[buzz44]

While 1
    $file_songs = FileFindNextFile($search)
    If @error Then ExitLoop
    $sort = StringReplace($file_songs, ".mp3", "|")
    $split = StringSplit($sort, " - ")
    GUICtrlCreateListViewItem($split[1] & "|" & $split[2], $list)
WEnd