Zeile bei DCBROWSE hervorheben [erledigt]

Moderator: Moderatoren

Antworten
Klaus Stebner
UDF-Programmierer
UDF-Programmierer
Beiträge: 66
Registriert: Fr, 29. Feb 2008 20:53
Wohnort: Furtwangen

Zeile bei DCBROWSE hervorheben [erledigt]

Beitrag von Klaus Stebner »

Hallo,

habe ein DC_Browse, bei dem das aktuell selektierte Feld durch einen gelben
Hintergrund angezeigt wird.
Browse01.jpg
Browse01.jpg (81.73 KiB) 3091 mal betrachtet
ich möchte nun, dass die gesamte Zeile einen entsprechenden Hintergrund erhält.
Browse02.jpg
Browse02.jpg (81.02 KiB) 3091 mal betrachtet
Hat das jemand schon gemacht?

Suche eine einfache Lösung.
Es fehlt mir aber der richtige Ansatz um das Problem zu lösen!
Zuletzt geändert von Klaus Stebner am Sa, 26. Feb 2011 15:47, insgesamt 1-mal geändert.
Gruß Klaus
Benutzeravatar
Wolfgang Ciriack
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 2934
Registriert: Sa, 24. Sep 2005 9:37
Wohnort: Berlin
Hat sich bedankt: 13 Mal
Danksagung erhalten: 34 Mal
Kontaktdaten:

Re: Zeile bei DCBROWSE hervorheben

Beitrag von Wolfgang Ciriack »

Hallo Klaus,
setze einfach einen Codeblock (_bColorbl) bei jeder DCBROWSECOL:

Code: Alles auswählen

local _bColorbl:={|| iif( meinebedingung, {GRA_CLR_YELLOW,GRA_CLR_DARKBLUE}, iif(meinebedingung2,{NIL,GRA_CLR_PALEGRAY},{NIL,NIL}))}

DCBROWSECOL ......  COLOR _bColorbl
Viele Grüße
Wolfgang
Klaus Stebner
UDF-Programmierer
UDF-Programmierer
Beiträge: 66
Registriert: Fr, 29. Feb 2008 20:53
Wohnort: Furtwangen

Re: Zeile bei DCBROWSE hervorheben

Beitrag von Klaus Stebner »

Hallo Wolfgang,

das mit dem Codeblock bei jedem DCBROWSECOL habe ich schon gemacht. Hier wird die Zeile
grün dargestellt, falls der Merker Nachkalkulation gesetzt ist (hatte ich nicht erwähnt).

Der entscheidende Hinweis von Dir war die Mehrfachabfrage im Codeblock.
Das war neu für mich und gleichzeitig die Lösung.

Dafür besten Dank

Code: Alles auswählen

aColors := { {GRA_CLR_WHITE,GRA_CLR_RED}, ;
             {GRA_CLR_BLACK,GRA_CLR_GREEN}, ;
             {GRA_CLR_BLACK,GRA_CLR_WHITE}, ; 
             {GRA_CLR_BLACK,GRA_CLR_PALEGRAY} }

fColor := {||aColors[IIF((Recno()= nRecno), 4, IIF((FT->NACHKALKU=.T.), 2,  3))]}
....

DCBROWSECOL FIELD FT->SAUFTRAGNR ;
  EVAL { |o| o:colorBlock := fColor } ;
  HEADER "Teile-" PARENT oBrowse2 ;
  PROTECT {||.T.} ;
  WIDTH 5 FOOTER 'Nummer' ;
  SORT bSortCol DEFAULT

DCBROWSECOL FIELD FT->SSF_A ;
  EVAL { |o| o:colorBlock := fColor } ;
  HEADER "Artikel-" PARENT oBrowse2 ;
  PROTECT {||.T.} ;
  WIDTH 12 FOOTER 'Bezeichung' ;
  SORT bSortCol
......
Gruß Klaus
Antworten