[阅读: 395] 2004-11-01 09:17:32
SysColorValues: array [0 .. SysColCount - 1] of TDefColorItem = (
{$IFDEF VCL}
(Value: clScrollBar; Constant: 'clScrollBar'; Description: RsClScrollBar),
(Value: clBackground; Constant: 'clBackground'; Description: RsClBackground),
(Value: clActiveCaption; Constant: 'clActiveCaption'; Description: RsClActiveCaption),
(Value: clInactiveCaption; Constant: 'clInactiveCaption'; Description: RsClInactiveCaption),
(Value: clMenu; Constant: 'clMenu'; Description: RsClMenu),
(Value: clWindow; Constant: 'clWindow'; Description: RsClWindow),
(Value: clWindowFrame; Constant: 'clWindowFrame'; Description: RsClWindowFrame),
(Value: clMenuText; Constant: 'clMenuText'; Description: RsClMenuText),
(Value: clWindowText; Constant: 'clWindowText'; Description: RsClWindowText),
(Value: clCaptionText; Constant: 'clCaptionText'; Description: RsClCaptionText),
(Value: clActiveBorder; Constant: 'clActiveBorder'; Description: RsClActiveBorder),
(Value: clInactiveBorder; Constant: 'clInactiveBorder'; Description: RsClInactiveBorder),
(Value: clAppWorkSpace; Constant: 'clAppWorkSpace'; Description: RsClAppWorkSpace),
(Value: clHighlight; Constant: 'clHighlight'; Description: RsClHighlight),
(Value: clHighlightText; Constant: 'clHighlightText'; Description: RsClHighlightText),
(Value: clBtnFace; Constant: 'clBtnFace'; Description: RsClBtnFace),
(Value: clBtnShadow; Constant: 'clBtnShadow'; Description: RsClBtnShadow),
(Value: clGrayText; Constant: 'clGrayText'; Description: RsClGrayText),
(Value: clBtnText; Constant: 'clBtnText'; Description: RsClBtnText),
(Value: clInactiveCaptionText; Constant: 'clInactiveCaptionText'; Description: RsClInactiveCaptionText),
(Value: clBtnHighlight; Constant: 'clBtnHighlight'; Description: RsClBtnHighlight),
(Value: cl3DDkShadow; Constant: 'cl3DDkShadow'; Description: RsCl3DDkShadow),
(Value: cl3DLight; Constant: 'cl3DLight'; Description: RsCl3DLight),
(Value: clInfoText; Constant: 'clInfoText'; Description: RsClInfoText),
(Value: clInfoBk; Constant: 'clInfoBk'; Description: RsClInfoBk)
{$ENDIF VCL}
{$IFDEF VisualCLX}
(Value: clForeground; Constant: 'clForeground'; Description: RsClForeground),
(Value: clButton; Constant: 'clButton'; Description: RsClButton),
(Value: clLight; Constant: 'clLight'; Description: RsClLight),
(Value: clMidlight; Constant: 'clMidlight'; Description: RsClMidlight),
(Value: clDark; Constant: 'clDark'; Description: RsClDark),
(Value: clMid; Constant: 'clMid'; Description: RsClMid),
(Value: clText; Constant: 'clText'; Description: RsClText),
(Value: clBrightText; Constant: 'clBrightText'; Description: RsClBrightText),
(Value: clButtonText; Constant: 'clButtonText'; Description: RsClButtonText),
(Value: clBase; Constant: 'clBase'; Description: RsClBase),
(Value: clBackground; Constant: 'clBackground'; Description: RsClBackground),
(Value: clShadow; Constant: 'clShadow'; Description: RsClShadow),
(Value: clHighlight; Constant: 'clHighlight'; Description: RsClHighlight),
(Value: clHighlightedText; Constant: 'clHighlightedText'; Description: RsClHighlightedText),
(Value: clNormalForeground; Constant: 'clNormalForeground'; Description: RsClNormalForeground),
(Value: clNormalButton; Constant: 'clNormalButton'; Description: RsClNormalButton),
(Value: clNormalLight; Constant: 'clNormalLight'; Description: RsClNormalLight),
(Value: clNormalMidlight; Constant: 'clNormalMidlight'; Description: RsClNormalMidlight),
(Value: clNormalDark; Constant: 'clNormalDark'; Description: RsClNormalDark),
(Value: clNormalMid; Constant: 'clNormalMid'; Description: RsClNormalMid),
(Value: clNormalText; Constant: 'clNormalText'; Description: RsClNormalText),
(Value: clNormalBrightText; Constant: 'clNormalBrightText'; Description: RsClNormalBrightText),
(Value: clNormalButtonText; Constant: 'clNormalButtonText'; Description: RsClNormalButtonText),
(Value: clNormalBase; Constant: 'clNormalBase'; Description: RsClNormalBase),
(Value: clNormalBackground; Constant: 'clNormalBackground'; Description: RsClNormalBackground),
(Value: clNormalShadow; Constant: 'clNormalShadow'; Description: RsClNormalShadow),
(Value: clNormalHighlight; Constant: 'clNormalHighlight'; Description: RsClNormalHighlight),
(Value: clNormalHighlightedText; Constant: 'clNormalHighlightedText'; Description: RsClNormalHighlightedText),
(Value: clActiveForeground; Constant: 'clActiveForeground'; Description: RsClActiveForeground),
(Value: clActiveButton; Constant: 'clActiveButton'; Description: RsClActiveButton),
(Value: clActiveLight; Constant: 'clActiveLight'; Description: RsClActiveLight),
(Value: clActiveMidlight; Constant: 'clActiveMidlight'; Description: RsClActiveMidlight),
(Value: clActiveDark; Constant: 'clActiveDark'; Description: RsClActiveDark),
(Value: clActiveMid; Constant: 'clActiveMid'; Description: RsClActiveMid),
(Value: clActiveText; Constant: 'clActiveText'; Description: RsClActiveText),
(Value: clActiveBrightText; Constant: 'clActiveBrightText'; Description: RsClActiveBrightText),
(Value: clActiveButtonText; Constant: 'clActiveButtonText'; Description: RsClActiveButtonText),
(Value: clActiveBase; Constant: 'clActiveBase'; Description: RsClActiveBase),
(Value: clActiveBackground; Constant: 'clActiveBackground'; Description: RsClActiveBackground),
(Value: clActiveShadow; Constant: 'clActiveShadow'; Description: RsClActiveShadow),
(Value: clActiveHighlight; Constant: 'clActiveHighlight'; Description: RsClActiveHighlight),
(Value: clActiveHighlightedText; Constant: 'clActiveHighlightedText'; Description: RsClActiveHighlightedText),
(Value: clDisabledForeground; Constant: 'clDisabledForeground'; Description: RsClDisabledForeground),
(Value: clDisabledButton; Constant: 'clDisabledButton'; Description: RsClDisabledButton),
(Value: clDisabledLight; Constant: 'clDisabledLight'; Description: RsClDisabledLight),
(Value: clDisabledMidlight; Constant: 'clDisabledMidlight'; Description: RsClDisabledMidlight),
(Value: clDisabledDark; Constant: 'clDisabledDark'; Description: RsClDisabledDark),
(Value: clDisabledMid; Constant: 'clDisabledMid'; Description: RsClDisabledMid),
(Value: clDisabledText; Constant: 'clDisabledText'; Description: RsClDisabledText),
(Value: clDisabledBrightText; Constant: 'clDisabledBrightText'; Description: RsClDisabledBrightText),
(Value: clDisabledButtonText; Constant: 'clDisabledButtonText'; Description: RsClDisabledButtonText),
(Value: clDisabledBase; Constant: 'clDisabledBase'; Description: RsClDisabledBase),
(Value: clDisabledBackground; Constant: 'clDisabledBackground'; Description: RsClDisabledBackground),
(Value: clDisabledShadow; Constant: 'clDisabledShadow'; Description: RsClDisabledShadow),
(Value: clDisabledHighlight; Constant: 'clDisabledHighlight'; Description: RsClDisabledHighlight),
(Value: clDisabledHighlightedText; Constant: 'clDisabledHighlightedText'; Description: RsClDisabledHighlightedText),
(Value: clDesktop; Constant: 'clDesktop'; Description: RsClDesktop),
(Value: clInfoBk; Constant: 'clInfoBk'; Description: RsClInfoBk)
{$ENDIF VisualCLX}
); <---居然提示这里应该是“(”,不该是 ")"