klikken, hoe in opgaande of neergaande gegeven door de kolom van de lijst gesorteerd?,,,,, door de gebruikers door de kolom, TlistView. Wij hopen dat de volgende, op de lijst van mening:,,,, het gedrag van de gebruikers als m kolom benaming, moeten door de kolom,,,,, de oorspronkelijke volgorde moeten worden bevorderd.Als de gebruiker op dezelfde lijst, sorteren moeten omschakelen.Als de gebruiker op een lijst opgenomen van de nieuwe volgorde in de laatste kolom wordt hetzelfde. We hebben twee variabelen voor de laatste kolom van de door de gebruiker en de volgorde op de uitvoering,,,,,,,,,,,, de verbetering van lastsortedcolumn:VaR, gehele;: Bull.,,, kunnen we starten het creëren van een vorm van: een gebeurtenis plaatsvindt,,, programma. Formcreate (afzender: TObject); lastsortedcolumn:= 1,,,,,,, bevordering van: = echt;,,,,, aan het einde van de volgorde; m in de volgorde van de gebeurtenissen columnclick:,,, de procedures Aan de hand van een incident. Listview1columnclick (afzender: TObject;,, kolom: tlistcolumn);,,,,, als de index = lastsortedcolumn kolom.En dan, de bevordering van: = niet opstijgen, anders, lastsortedcolumn:= kolom. Index;,, TlistView (afzender). Customsort (@ sortbycolumn, kolom. - index);,,,,, aan het einde van sortbycolumn; een functie is, moet worden vergeleken met de eerder aangekondigde en customsort twee functies.Door de gegevens van de waarden van de parameters customsort als gegevens sortbycolumn afgelopen, en we gebruiken om de volgorde van de functie:,,, sortbycolumn (1, 2:tlistitem; gegevens: de gehele):,, de gehele; stdcall;,,,, als de gegevens en resultaten: = = = = = = = 0, ansicomparetext (item1.caption, 2. Gedownload van www.ondertitel.com), andere,, resultaten: = ansicomparetext (1. Sub - [data],,, 2. Sub - [data]); verbetering van de resultaten, indien niet, dan = resultaat;,,,,, je kan een einde maken aan; In het archief met 25&#PESCA communicatie te vinden in dit artikel de source code,