ListViewGadget: Texte rechtsbündig

[marcelx]

Hallo,

bei ListViewGadget sind die Text linksbündig, gibt es eine Möglichkeit die Zeilen rechtsbündig zu setzen?

Danke und Gruß

MarcelX

[RSBasic]

Code: Alles auswählen

EnableExplicit

Define EventID

If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  ListViewGadget(1, 10, 10, 480, 380, 0)
  AddGadgetItem(1, -1, "Ein Eintrag", 0, 0)
  AddGadgetItem(1, -1, "Und noch ein Eintrag", 0, 0)
  AddGadgetItem(1, -1, "Test-Eintrag", 0, 0)
  
  SetWindowLongPtr_(GadgetID(1), #GWL_EXSTYLE, GetWindowLongPtr_(GadgetID(1), #GWL_EXSTYLE) | #WS_EX_LAYOUTRTL)
  
  Repeat
    EventID = WaitWindowEvent()
    If EventID = #PB_Event_CloseWindow
      End
    EndIf
  ForEver
EndIf

[marcelx]

Wunderbar

Danke für die schnelle Antwort