[RESOLU] Alignement listicongadget

[coxco]

Salut

Je cherche comment aligner à droite les colonnes de ma listicongadget
Est ce possible ?

Merci

[MLD]

Salut Coxco

regarde ceci

Code : Tout sélectionner

Procedure JustifyColumn(Gadget, Column, FMT)
      Lvc.LV_COLUMN
      Lvc\Mask = #LVCF_FMT
      Select FMT
            Case 0
                  Lvc\FMT = #LVCFMT_LEFT
            Case 1
                  Lvc\FMT = #LVCFMT_CENTER
            Case 2
                  Lvc\FMT = #LVCFMT_RIGHT
      EndSelect
      SendMessage_(GadgetID(Gadget), #LVM_SETCOLUMN, Column, @Lvc)
EndProcedure

If OpenWindow(0, 100, 100, 500, 100, "ListIconGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
   ListIconGadget(0, 5, 5, 490, 90, "Nom", 100, #PB_ListIcon_FullRowSelect|#PB_ListIcon_AlwaysShowSelection)
   AddGadgetColumn(0, 1, "Adresse", 250)
   AddGadgetItem(0, -1, "Harry Rannit"+Chr(10)+"12 Parliament Way, Battle Street, By the Bay")
   AddGadgetItem(0, -1, "Ginger Brokeit"+Chr(10)+"130 PureBasic Road, BigTown, CodeCity")
   
      NumeroColonne = 1 ; (0 = première colonne, 1 = deuxième colonne, etc...)
      JustifyColumn(0, 1, 2)

   
   Repeat
     Evenement = WaitWindowEvent()
   Until Evenement = #PB_Event_CloseWindow
EndIf

a+

[coxco]

Eh bah je ne dirais qu'un mot, Génial

Merci

[GallyHC]

Bonjour,

J'ai pas encore besoin de cela mais c'st a mettre de cote car tot ou tard ce sera utile, alors merci aussi de ma part.

Cordialement,
GallyHC