Newsgroup: it.comp.lang.visual-basic
Titolo: Ordinamento ListView

Salve a tutti,
ho visto che l'argomento e gia' stato trattato ma non ho trovato ancora 
una soluzione a questo problema:
Elenco di file cosi composti:
Id   Data   Ext
-- -------- ---
01-14082002.dat
01-15082002.dat
01-10102002.dat
01-12102002.dat
01-14102002.dat
01-08112002.dat
01-13112002.dat
Ho la necessita' di caricare i nomi di questi file in una listBox con lo 
style a checkbox dimodoche' l'utente possa spuntare i file desiderati.
Il problema e' ovviamente il solito, l'ordinamento e' alfabetico per cui 
il risultato della ListBox (sortata) e' il seguente:
Id   Data   Ext
-- -------- ---
01-15082002.dat
01-10102002.dat
01-12102002.dat
01-13112002.dat
01-14082002.dat
01-14102002.dat
01-08112002.dat
Ho guardato anche la FileListBox ma mi pare faccia la stessa cosa.
Forse devo caricare un'array per sortarlo come mi pare e caricare la 
ListBox con quello??.
Saluti e grazie
PaoloF
PS
Lo so che avevate gia' capito anche senza l'esempio ma meglio una parola 
in piu' che una in meno.

 ListBox con quello??.
l'ultima che hai detto, direi
Salutoni
Sergio

 01-08112002.dat
Spiacente ma non mi risulta! L'ordinamento che invece mi risulta e' questo:
Id   Data   Ext
-- -------- ---
01-08112002.dat
01-10102002.dat
01-12102002.dat
01-13112002.dat
01-14082002.dat
01-14102002.dat
01-15082002.dat
Sei sicuro di aver impostato la proprieta' sorted della listbox a true in
fase di progettazione?
Lokar
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
UGIdotNET - 
http://www.ugidotnet.org

 
Si' hai ragione!, smanettando non avevo riattivato la proprieta' sorted.
Comunque il risultato non cambia, faro' un array ordinandolo e 
carichero' con quello la ListBox (mi vado a cercare una routine a giro 
xche' mi pare che vb non preveda nessuna funzione di sort!?).
Grazie 
Ciao
PaoloF

 pare che vb non preveda nessuna funzione di sort!?).
Sito comune :)
hth,


 Per risalire poi al nome del file fai la conversione inversa:
aaargh :P
io starei sulla prima.
con questa, le probabilita' di fare casini mi sembrano
vertiginosamente alte.
ciao, j.

 mi sembrano vertiginosamente alte.
Naah, perche' mai? :)
Bastano un paio di check qua e la, come:
'Lunghezza nome file
Len(NomeFileIns) = 15
'Estensione corretta
UCase$(Right$(NomeFileIns, 4)) = ".DAT"
'Prefisso corretto
IsNumeric(Left$(NomeFileIns, 2))
'Carattere separatore "-"
Instr$(NomeFileIns, "-") = 3
'Ed infine controllo che la data sia valida
'prima di inserirla
ItemIns = Mid$(NomeFileIns, 8, 4) & "-" & _
          Mid$(NomeFileIns, 6, 2) & "-" & _
          Mid$(NomeFileIns, 4, 2)
If IsDate(ItemIns) Then
    List1.AddItem(ItemIns)
    'List1.AddItem(ItemIns & "-" & Left$(NomeFileIns, 2))
End If


 Bastano un paio di check qua e la, come:
e non fai prima a dare dei filename come dio comanda ?
certo, puoi anche costruire l'empire state building a partire
dall'antennina, ma forse dalle fondamenta viene meglio :)
--
ciao, j.
www.sundaysw.com
a parte che il tuo concetto di "un paio" mi sembra pericolosamente
affollato :))

 sembra pericolosamente affollato :))
<aria ingenua>
Perche' mai?
</aria ingenua>
ROTFL ;)
Happy Coding =)
