Aktuelle Zeit: 11.07.2020 00:14

Alle Zeiten sind UTC + 1 Stunde [ Sommerzeit ]




Ein neues Thema erstellen Auf das Thema antworten  [ 3 Beiträge ] 
Autor Nachricht
 Betreff des Beitrags: Modul ListIconGadgetEx: RenderCell()
BeitragVerfasst: 18.10.2019 17:02 
Offline
Benutzeravatar

Registriert: 08.09.2004 08:21
Wohnort: Amphibios 9
Grüezi,

vielleicht kennt Ihr bereits mein Modul ListIconGadgetEx, das mehrere Funktionen bietet, die SpiderBasic nativ nicht unterstützt.

https://github.com/spiderbytes/ListIconGadgetEx

Ich habe nun eine neue Prozedur namens RenderCell() hinzugefügt, die es ermöglicht, die Datenausgabe zu manipulieren. Auf diese Weise könnt Ihr das Aussehen Eurer Daten beeinflussen.

Beispiel:
Code:
EnableExplicit

XIncludeFile "ListIconGadgetEx.sbi"

Enumeration
  #Window
  #ListIconGadget
EndEnumeration

Procedure.s RenderCell(Row, Col, Text.s, TD, ListIconGadget)
 
  ; We want to set the text color depending on the amount:
 
  Protected TextColor.s
 
  If Val(Text) > 0
   
    ; incomming -> that's good! :-)
    TextColor = "green"
   
  ElseIf Val(Text) < 0
   
    ; outgoing  -> that's bad :-(
    TextColor = "red"
   
  ElseIf Val(Text) = 0
   
    ; 0 -> neutral
    TextColor = "black"
   
  EndIf
 
  ! $(v_td).css("color", v_textcolor)
 
  ! $(v_td).css("text-align", "right"); // the column is right-aligned
 
  ; Now we change the output text:
 
  ; Please keep in mind that this only affects the *output*
  ; and GetGadget(Item)Text() still returns the Amount (without the '€'-sign)
 
  Text + " €"
 
  ! $(v_td).text(v_text);
 
EndProcedure

OpenWindow(#Window, #PB_Ignore, #PB_Ignore, 250, 200, "RenderCell Demo 1", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)

ListIconGadget(#ListIconGadget, 0, 0, WindowWidth(#Window), WindowHeight(#Window), "Description", 100, #PB_ListIcon_FullRowSelect | #PB_ListIcon_AlwaysShowSelection)

AddGadgetColumn(#ListIconGadget, 1, "Amount", 100)

AddGadgetItem(#ListIconGadget, -1, "Salary"        + #LF$ + "2000")
AddGadgetItem(#ListIconGadget, -1, "Food & Drinks" + #LF$ + "-500")
AddGadgetItem(#ListIconGadget, -1, "Car Petrol"    + #LF$ + "-160")
AddGadgetItem(#ListIconGadget, -1, "Internet"      + #LF$ + "-50")

ListIconGadgetEx::RenderCell(#ListIconGadget, 1, @RenderCell()) ; we want to render the Amount-Column


Bild

Grüße ... Peter

_________________
Schrödingers Smiley :):


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Modul ListIconGadgetEx: RenderCell()
BeitragVerfasst: 18.10.2019 20:16 
Offline
Admin
Benutzeravatar

Registriert: 05.10.2006 18:55
Wohnort: Gernsbach
Danke für die Umsetzung. :allright:

_________________
BildBildBildBild BildBild


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Modul ListIconGadgetEx: RenderCell()
BeitragVerfasst: 21.10.2019 14:54 
Offline
Benutzeravatar

Registriert: 08.09.2004 08:53
Super, dass eröffnet neue Möglichkeiten. Danke! :allright:

_________________
"Papa, mein Wecker funktioniert nicht! Der weckert immer zu früh."


Nach oben
 Profil  
Mit Zitat antworten  
Beiträge der letzten Zeit anzeigen:  Sortiere nach  
Ein neues Thema erstellen Auf das Thema antworten  [ 3 Beiträge ] 

Alle Zeiten sind UTC + 1 Stunde [ Sommerzeit ]


Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 0 Gäste


Sie dürfen keine neuen Themen in diesem Forum erstellen.
Sie dürfen keine Antworten zu Themen in diesem Forum erstellen.
Sie dürfen Ihre Beiträge in diesem Forum nicht ändern.
Sie dürfen Ihre Beiträge in diesem Forum nicht löschen.

Suche nach:
Gehe zu:  

 


Powered by phpBB © 2008 phpBB Group | Deutsche Übersetzung durch phpBB.de
subSilver+ theme by Canver Software, sponsor Sanal Modifiye