list control fill with array

[placebo]

CODE

$var = DriveGetDrive( "all" )

If NOT @error Then

MsgBox(4096,"", "Found " & $var[0] & " drives")

For $i = 1 to $var[0]

MsgBox(4096,"Drive " & $i, $var[$i])

Next

EndIf

; LIST

GuiCtrlCreateList("", 5, 190, 100, 90)

GuiCtrlSetData(-1, "item", "item")

this is my code, i want to view all my drives in a listbox.

I have all my drives in an array, and i want that array to be the source-data for my list-control.

how do i have to work?

[PsaltyDS]

$var = DriveGetDrive( "all" )
If NOT @error Then
    MsgBox(4096,"", "Found " & $var[0] & " drives")
    For $i = 1 to $var[0]
        MsgBox(4096,"Drive " & $i, $var[$i])
    Next
EndIf

; LIST
GuiCtrlCreateList("", 5, 190, 100, 90)
GuiCtrlSetData(-1, "item", "item")

this is my code, i want to view all my drives in a listbox.

I have all my drives in an array, and i want that array to be the source-data for my list-control.

how do i have to work?

Just put GuiCtrlSetData() in a loop, the same way you did the "Drive" MsgBox().

[martin]

CODE

$var = DriveGetDrive( "all" )

If NOT @error Then

MsgBox(4096,"", "Found " & $var[0] & " drives")

For $i = 1 to $var[0]

MsgBox(4096,"Drive " & $i, $var[$i])

Next

EndIf

; LIST

GuiCtrlCreateList("", 5, 190, 100, 90)

GuiCtrlSetData(-1, "item", "item")

this is my code, i want to view all my drives in a listbox.

I have all my drives in an array, and i want that array to be the source-data for my list-control.

how do i have to work?

Have a look at th eexample in the help for a list view.

EDIT: as PsaltyDS says or like this.

$gui = GUICreate("list Drives", 200, 300, 200, 200)
; LIST
$lv = GUICtrlCreateList("", 5, 190, 100, 90)
GUISetState()
$listData = ""
$var = DriveGetDrive("all")
If Not @error Then
    MsgBox(4096, "", "Found " & $var[0] & " drives")
    For $i = 1 To $var[0]
        MsgBox(4096, "Drive " & $i, $var[$i])
        $listData &= $var[$i] & '|'
    Next
EndIf


GUICtrlSetData($lv, $listData)

While GUIGetMsg() <> -3
    
WEnd

Edited October 8, 2008 by martin

[placebo]

thanks :-)

it works fine!

stupid question of me!