XProfan

Frank
Abbing

Hm, so a boundary is me not famous.
but The Csv-File is so quite opaque. If you me whom code and any required Files zuschickst, look I me The thing gladly at times.

03/17/07 ▲

have You here The right values stand (The 16 is important) ?

@Hello Walter
there my ADRESSOR-1.0 ditto with 16 Split runs, have I your CSV-File time therein launched. the Result see You in Ausschnitten into two Images. by me becomes each slot anstandslos on- and downward with Click sortiert. -
Compile Mark Separation

If bytes&>0

    Dim bereich#,bytes&
    ReadFileQuick(addr(main_datei$),bereich#,0,bytes&)
    CsvToListview(listview&,bereich#,bytes&,16)
    Dispose bereich#

E

ab_sortiert.jpg Preview

131 kB

Hochgeladen:

03/18/07

Downloadcounter:

Download

auf_sortiert.jpg Preview

132 kB

Hochgeladen:

03/18/07

Downloadcounter:

Download

Jörg
Sellmeyer

I can The observation of Walter confirm. with numerischer Sorting becomes ca. in the downstairs Drittel everything confusion gewürfelt. is well To see, if one The slot with the Jahreszahlen sortiert.

ListView3.prf	3 kB

Hochgeladen:	03/18/07

Downloadcounter:
		Download

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

must my opinion revidieren - with the nummerischen Sorting becomes to that Schluss motley mixed - too with my code (ADRESSOR) happens the - having first The nummerische Sorting not until end chasing

@Walter
have You objectively The whole Musiktitel from the CSV-File your Festplatte ?

Frank
Abbing

Hi,

kanns too understand, and Have already a Statement parat.

guilt are The clear Lines! Each vain row created a Error in the Sorting. Any Lines with numbers filled, operates The Sorting - How dwelt - correctly. How long is this bow now really already undetected stayed?

so, Have now a additional Sicherung into Sorting installed, so too The clear Lines correctly. machine go. in the attachment a bow-bereinigte Version list view.dll.

Listview.dll	88 kB

Hochgeladen:	03/18/07

Downloadcounter:
		Download

Jörg
Sellmeyer

Wow! the nenn I service! and same the new Version!
I faith though, that the crux with Walter one another is. of these code exit it namely still on.
Compile Mark Separation

besser nicht im Interpreter laufen lassen, sonst könnt ihr erstmal Kaffee trinken gehen!
 $I Listview_Funktionen.inc
Declare LVDllHdl&
Declare LVItemtexts#,LVbereich#,LVBuffer#,LVParamBuffer#
Dim LVParamBuffer#,320
Dim LVItemtexts#,16384
LVDllHdl&=UseDll(Listview.dll)
Declare ListView2&

Proc TextListView2

    WhileLoop 0,16000

        SetItem ListView2&,Test  + Format$(0000,&Loop),Test,Test,Format$(0000,Rnd(&Loop)),Test,Test,Test,Test,Test,Test

    Wend

EndProc

Proc SetListView2

    InitMessages(%hwnd)
    Declare tmptxt$
    tmptxt$=Spalte 1
    IColumn(ListView2&,Addr(tmptxt$),200,1)
    tmptxt$=Spalte 2
    IColumn(ListView2&,Addr(tmptxt$),140,0)
    tmptxt$=Spalte 3
    IColumn(ListView2&,Addr(tmptxt$),100,0)
    tmptxt$=Spalte 4
    IColumn(ListView2&,Addr(tmptxt$),100,0)
    IColumn(ListView2&,Addr(tmptxt$),100,0)
    IColumn(ListView2&,Addr(tmptxt$),100,0)
    IColumn(ListView2&,Addr(tmptxt$),100,0)
    IColumn(ListView2&,Addr(tmptxt$),100,0)
    IColumn(ListView2&,Addr(tmptxt$),100,0)
    IColumn(ListView2&,Addr(tmptxt$),100,0)
    IColumn(ListView2&,Addr(tmptxt$),100,0)
    TextListView2
    ShowListView(ListView2&,1,1,Width(%hwnd) - 2,Height(%hwnd) - 2)

EndProc

Proc ExitLV

    Dispose LVItemtexts#
    Dispose LVParamBuffer#
    CloseMessages(%hwnd)
    FreeDll LVDllHdl&

EndProc

UserMessages 16
WindowStyle $218
Window 100,100 - 620,520
ListView2&=CreateListView(%hwnd,%hinstance,0,14417146,-1,$0)
SetListView2
SetColumnAlignment(ListView2&,0,1)
Autosortlistview(ListView2&,2,0,1,2)
Update(ListView2&)
Declare ende%

WhileNot ende%

    WaitInput

    If %umessage = 16

        ende% = 1

    EndIf

Wend

ass=s4 href='./../../Function-References/XProfan/exitlv/'>ExitLV

If one first slot 4 sortiert, can itself thereafter slot 1 not any more sort. one must well whom Click on the Column Button intercepting and the Autosortiererei for slot 4 pick up circa slot 1 To sort. But this is probably not sense the Features, or?
Greeting
Jörg

[offtopic]have I already erwähnt, that you The Preview extreme well been successful is, iF? No? OK - means The Preview is you extreme well been successful![/offtopic]

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

[offtopic]
Jörg Sellmeyer

[offtopic]have I already erwähnt, that you The Preview extreme well been successful is, iF? No? OK - means The Preview is you extreme well been successful![/offtopic]

thanks.

[/offtopic]

Frank
Abbing

If one first slot 4 sortiert, can itself thereafter slot 1 not any more sort.

Hm, can I not confirm. time foreseen of it, that You attempt,in your Testprogramm slot 1 to numbers To sort, though it eindeutig Texts contains. Text 1353 is nunmal no number and must accordingly to letters sortiert go...
Walters code functions correct with the new Dll!

Jörg
Sellmeyer

have right. by me functions it too!

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

Walter
Köhler

in the serious, freut me too something give to as go ahead take.
and wenn´s only the Info on a Buck is.
well the Frank the immediate korrigiert has. I had me already The work made and any clear boxes with 9999 To fill, sees but shit aus; can I means again lane make.
@ Frank with this CSV File. MACHE MAL THE FOLLOWING

Erstelle a copy
lösche some Lines by chance
Füge in the copy some Lines imaginär moreover

well then cue COMPARE
Search the Lines, which in slot1 +slot2 (Interpret and cover) discern.
I komm with plainer Loop on 3 sec, under the prerequisite of/ one eindeutigen Sorting beider List view to equal criteria in slot1+2
via Sortmanual (well the it the gives, otherwise lasts The thing unending)

WKS Win XP Xprofan 10 AMD 1.6GHz 1GB Ram

03/19/07 ▲

Walter
Köhler

is only one neckline Horst.
have altogether 156 CD`s with apiece ca. 200 MP3 Songs.
(is hold my hobby, as long as I think can )
I wanted to not sooner everything reading, To the Gesamtprogram standing.
sees already integrally nice from, will be the then time present wenn´s is done.

WKS Win XP Xprofan 10 AMD 1.6GHz 1GB Ram

03/19/07 ▲