Page 1 sur 1
listicon a droite
Publié : lun. 24/janv./2011 14:18
par Parole De JOJO
encore mes problemes de langues phonetique, mais je programme un truc avec du texte hebreu, et evidement il faut tout afficher de droite a gauche
pour les bouttons et le texte il y a une option (merci fred) d'afficher a droite, mais d'autres gadgets (par exemple la listicon) non
y aurait pas une petite api qui reglerait l'affaire?
Re: listicon a droite
Publié : mar. 25/janv./2011 20:09
par falsam
La fonction
ReverseString() associé au code ci-dessous devrait t'aider (J’espère)
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, "Bonjour"+Chr(10)+ReverseString("Bonjour"))
AddGadgetItem(0, -1, "Au revoir"+Chr(10)+ReverseString("Au revoir"))
JustifyColumn(0, 1, 2)
Repeat
Evenement = WaitWindowEvent()
Until Evenement = #PB_Event_CloseWindow
EndIf
PS : ReverseString n'est peut être pas utile si tu as déjà la traduction du mot en hébreu
Au cas ou tu aurais besoin d'installer une
police hébraïque
Re: listicon a droite
Publié : mer. 26/janv./2011 17:03
par Parole De JOJO
merci
mon ordi est en reparation, je verrais donc la semaine prochaine
sur le fofo uk ils m'ont donne un super truc
ca retourne toute la fenetre
Re: listicon a droite
Publié : mer. 26/janv./2011 18:10
par Chris
Effectivement, ça retourne toute la fenêtre.

Re: listicon a droite
Publié : mer. 26/janv./2011 18:12
par Parole De JOJO
c'est une api geniale, le seul probleme est que j'edite mes windows avec pureform et maintenant je dois tout faire a l'envers
Re: listicon a droite
Publié : mer. 26/janv./2011 18:17
par Chris
Ceci dit, tu n'est pas plus avancé.
Les textes sont alignés à droite, mais ils s'écrivent toujours de gauche à droite.
Re: listicon a droite
Publié : jeu. 27/janv./2011 9:50
par gnozal
On peut aussi s'amuser avec #WS_EX_LAYOUTRTL:
Code : Tout sélectionner
If OpenWindow(0, 450, 200, 390, 341, "Texte de droite à gauche", #PB_Window_SystemMenu|#PB_Window_MinimizeGadget|#PB_Window_TitleBar)
ListIconGadget(0, 52, 41, 307, 200, "1", 100, #PB_ListIcon_FullRowSelect | #PB_ListIcon_AlwaysShowSelection | #PB_ListIcon_GridLines)
SetWindowLongPtr_(GadgetID(0), #GWL_EXSTYLE, GetWindowLongPtr_(GadgetID(0), #GWL_EXSTYLE) | #WS_EX_LAYOUTRTL)
SetWindowLongPtr_(SendMessage_(GadgetID(0), #LVM_GETHEADER, 0, 0), #GWL_EXSTYLE, GetWindowLongPtr_(GadgetID(0), #GWL_EXSTYLE) | #WS_EX_LAYOUTRTL)
AddGadgetColumn(0, 1, "2", 100)
AddGadgetItem(0, -1, "01234" + Chr(10) + "56789")
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf