ich benutze folgenden Code um "visual Style" (benötigt XP Manifest ) im Browser Header zu erhalten
Code: Alles auswählen
oCol := ::Browser:getColumn(1)
#IF XPPVER > 01900331
oCol:heading:styleClass := "Header"
oCol:heading:stylePart := 1
oCol:heading:controlState := XBP_STATE_NORMAL
#ENDIF
Code: Alles auswählen
oCol := ::Browser:getColumn(1)
#IF XPPVER > 01900331
#define SORTEDUP 1
#define SORTEDDOWN 2
oCol:heading:styleClass := "Header"
oCol:heading:stylePart := 4
oCol:heading:controlState := SORTEDUP
#ENDIF
Frage : liegt das an meiner "ohne" Version ... es müsste mit der "normalen" Version gehen !!!
bitte mal "testen" und wenn es funktioniert das "Ergebniss" (Screenshot) posten.
wenn jemand sich überlegt woher ich das "weiss" das es gehen "müsste", der siehe mal in die TMSCHEMA.H
Code: Alles auswählen
//---------------------------------------------------------------------------------------
// "Header" Parts & Stateas
//---------------------------------------------------------------------------------------
BEGIN_TM_CLASS_PARTS(HEADER)
TM_PART(1, HP, HEADERITEM)
TM_PART(2, HP, HEADERITEMLEFT)
TM_PART(3, HP, HEADERITEMRIGHT)
TM_PART(4, HP, HEADERSORTARROW)
END_TM_CLASS_PARTS()
BEGIN_TM_PART_STATES(HEADERITEM)
TM_STATE(1, HIS, NORMAL)
TM_STATE(2, HIS, HOT)
TM_STATE(3, HIS, PRESSED)
END_TM_PART_STATES()
BEGIN_TM_PART_STATES(HEADERITEMLEFT)
TM_STATE(1, HILS, NORMAL)
TM_STATE(2, HILS, HOT)
TM_STATE(3, HILS, PRESSED)
END_TM_PART_STATES()
BEGIN_TM_PART_STATES(HEADERITEMRIGHT)
TM_STATE(1, HIRS, NORMAL)
TM_STATE(2, HIRS, HOT)
TM_STATE(3, HIRS, PRESSED)
END_TM_PART_STATES()
BEGIN_TM_PART_STATES(HEADERSORTARROW)
TM_STATE(1, HSAS, SORTEDUP)
TM_STATE(2, HSAS, SORTEDDOWN)
END_TM_PART_STATES()