[FUNC] Classer par Ordre Alphabétique

Partagez des fonctions et des UDF AutoIt.
Règles du forum
.
Répondre
Avatar du membre
Numeric
Niveau 5
Niveau 5
Messages : 106
Enregistré le : mer. 23 mars 2016 08:17
Status : Hors ligne

[FUNC] Classer par Ordre Alphabétique

#1

Message par Numeric » ven. 12 mai 2017 02:32

Salut :D
Voici une fonction pour classer vos données par ordre alphabétique.
#include <Array.au3>
#include <GuiListBox.au3>



; #FUNCTION# ====================================================================================================================
; Name ..........: ClasserParOrdreAlphabetique
; Description ...: Trie les elements d'un tableau par ordre alphabetique
; Syntax ........: ClasserParOrdreAlphabetique($sArrayOF_Elements)
; Parameters ....: $sArrayOF_Elements   - a string value.
; Return values .: Tableau des elements ordonnés selon l'ordre A-Z
;
; Author ........: Numeric
; Modified ......:
; Remarks .......:
; Related .......:
; Link ..........:
; Example .......: Oui
; ===============================================================================================================================
Func ClasserParOrdreAlphabetique($sArrayOF_Elements)

        Local $hGUI = GUICreate(" ", 400, 296)
        Local $idListBox = _GUICtrlListBox_Create($hGUI, "", 20, 20, 0x0002)

        _GUICtrlListBox_BeginUpdate($idListBox)

        For $iI = 1 To UBound($sArrayOF_Elements) - 1
                _GUICtrlListBox_AddString($idListBox, $sArrayOF_Elements[$iI])
        Next

        _GUICtrlListBox_EndUpdate($idListBox)

        Local $ListBoxGetCount = _GUICtrlListBox_GetCount($idListBox)
        Local $RangeArray[$ListBoxGetCount + 1]

        For $j = 0 To $ListBoxGetCount - 1
                $RangeArray[$j] = _GUICtrlListBox_GetText($idListBox, $j)
        Next
        ReDim $RangeArray[$j]
        _GUICtrlListBox_ResetContent($idListBox)
        _GUICtrlListBox_Destroy($idListBox)
        GUIDelete()
        Return $RangeArray
EndFunc   ;==>ClasserParOrdreAlphabetique


Local $sText = "Bonjour,Bonheur,Bonbon,Alain,Dupont,Rene,Gomez,Patati,Patata,Pff!!,Aye,humm"
Local $Split = StringSplit($sText, ",")
Local $ClasserParOrdre = ClasserParOrdreAlphabetique($Split)
_ArrayDisplay($ClasserParOrdre, "Ordre A-Z")
De 0 et 1 vers les étoiles , tout part du Binaire, Numeric

Avatar du membre
TommyDDR
Modérateur
Modérateur
Messages : 1787
Enregistré le : mar. 22 juil. 2008 20:55
Localisation : Nantes
Status : Hors ligne

Re: [FUNC] Classer par Ordre Alphabétique

#2

Message par TommyDDR » ven. 12 mai 2017 10:07

Les performances risquent de poser problème en cas de gros tableau ^^

Pourquoi ne pas utiliser _ArraySort($sArrayOF_Elements) ?
3.1415926535897932384626433832795028841971693993751058209749445923078164062862089986280348253421170679

Avatar du membre
Numeric
Niveau 5
Niveau 5
Messages : 106
Enregistré le : mer. 23 mars 2016 08:17
Status : Hors ligne

Re: [FUNC] Classer par Ordre Alphabétique

#3

Message par Numeric » mer. 31 mai 2017 14:21

Oui bien sûr...Bonne remarque....
De 0 et 1 vers les étoiles , tout part du Binaire, Numeric

Répondre