Spielereien mit dem ListIconGadget unter Linux

Hier könnt Ihr gute, von Euch geschriebene Codes posten. Sie müssen auf jeden Fall funktionieren und sollten möglichst effizient, elegant und beispielhaft oder einfach nur cool sein.
Benutzeravatar
Sicro
Beiträge: 955
Registriert: 11.08.2005 19:08
Kontaktdaten:

Spielereien mit dem ListIconGadget unter Linux

Beitrag von Sicro »

Code: Alles auswählen

If OpenWindow(0, 0, 0, 500, 300, "ListIcon Multiline", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  ListIconGadget(0, 5, 5, 490, 290, "Name", 100, #PB_ListIcon_FullRowSelect | #PB_ListIcon_AlwaysShowSelection)

  AddGadgetColumn(0, 1, "Info", 150)
  AddGadgetColumn(0, 2, "Sonstiges", 100)

  AddGadgetItem(0, -1, "Eintrag 1")
  AddGadgetItem(0, -1, "1. Zeile" + #LF$ + "2. Zeile")
  AddGadgetItem(0, -1, "1. Zeile" + #CR$ + "2. Zeile")
  AddGadgetItem(0, -1, "1. Zeile" + #CRLF$ + "2. Zeile")
  AddGadgetItem(0, -1, "1. Zeile" + #LFCR$ + "2. Zeile")

  Repeat
    Event = WaitWindowEvent()
  Until Event = #PB_Event_CloseWindow
EndIf
Bild

Code: Alles auswählen

If OpenWindow(0, 0, 0, 500, 300, "ListIcon Multiline", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  ListIconGadget(0, 5, 5, 490, 290, "Spaltentitel", 100, #PB_ListIcon_FullRowSelect | #PB_ListIcon_AlwaysShowSelection)

  AddGadgetColumn(0, 1, "1. Spaltentitel" + #LFCR$ + "2. Spaltentitel", 150)
  AddGadgetColumn(0, 2, "1. Spaltentitel" + #LF$   + "2. Spaltentitel", 100)

  AddGadgetItem(0, -1, "Eintrag 1")
   
  Repeat
    Event = WaitWindowEvent()
  Until Event = #PB_Event_CloseWindow
EndIf
Bild
Bild
Warum OpenSource eine Lizenz haben sollte :: PB-CodeArchiv-Rebirth :: Pleasant-Dark (Syntax-Farbschema) :: RegEx-Engine (kompiliert RegExes zu NFA/DFA)
Manjaro Xfce x64 (Hauptsystem) :: Windows 10 Home (VirtualBox) :: Neueste PureBasic-Version