ListView Quantity cap

[careca]

Hey ppl, having a problem where im using this:

Func LoadList()
$ReadSection = IniReadSection($iFile, 'PlayList')
If @error Then
MsgBox(64, 'Info', 'Nothing to load! This means it couldn't find the ini file, please save a playlist first.')
Else
For $i = 1 To $ReadSection[0][0]
$Numbers = $i
$array4 = StringLen($ReadSection[$i][1])
$array3 = StringInStr($ReadSection[$i][1], "\", 0, -1)
$array2 = $array4 - $array3
$arrayL = StringTrimRight($ReadSection[$i][1], $array2)
$arrayR = StringTrimLeft($ReadSection[$i][1], $array3)
GUICtrlCreateListViewItem($Numbers & '|' & $arrayL & '|' & $arrayR, $cListView)
GUICtrlSetState(-1, $GUI_FOCUS)
Next
$ListClick = $Id
GUICtrlSetState($ListClick, $GUI_FOCUS)
EndIf
EndFunc ;==>LoadList

to populate the list, and it stops as down as the scroll bar can go...if you know what i mean.

So the list is 3000+ items, and it will only go as far as 390. but, when i import folders and subfolders, it will populate the list with all files! :S

[careca]

Ok, got it, says in the help file, regarding inireadsection:

"Only the first 32767 chars are read for legacy reasons.", and that corresponds to the last item in the file, how can i make it read more?

[Melba23]

careca,

You could try SmOke_N's Ini*Ex UDF.

M23

[KaFu]

Besides the size limit, ini file operations offer a really bad performance imho. For large volume operations I would always advice to switch to using sqlite.

[careca]

Thanks guys, the thing is, i this is a mp3 player, and sometimes it can happen that one can save and load a really big list of files, all mp3 files,

i have some 3000+ and some people have more, the player cant have this limitation.

Gonna check that UDF, and sqlite to see what suits best my needs.

Thank you.

Greetz

[BrewManNH]

You could do what I did, on one of my projects, and use a flat file and read it using a loop and filereadline.

[careca]

That is what i've done

FileOpen($pfile, 0)
$Read = FileRead($pfile)
If @error Then
MsgBox(64, 'Info', 'Nothing to load! This means it couldnt find the file, please save a playlist')
Else
$ListLen = StringLen($Read)
For $i = 1 To $ListLen
$Line = $i
$Read = FileReadLine($pfile, $Line)
If $Read = Not '' Then
$Numbers = $i
$StrLen = StringLen($Read)
$StrL = StringInStr($Read, "", 0, -1)
$TrR = $StrLen - $StrL
$Folder = StringTrimRight($Read, $TrR)
$Track = StringTrimLeft($Read, $StrL)
GUICtrlCreateListViewItem($Numbers & '|' & $Folder & '|' & $Track, $cListView)
ToolTip('Loading track nº: ' & $Numbers)
Else
ToolTip('')
TrayTip('Info', 'Finished Loading the playlist!', '', 1)
ExitLoop
EndIf
Next

Edited December 17, 2012 by careca