ColorVisual: IVZColorVisual;
The ColorVisual property determines visualizer for data mapping of tree map data with color fill of their children.
Executing the example requires that the repository contains an express report with the EXP identifier. The unit containing the example should have links to the Drawing, Express, Metabase and Visualizators system assemblies. The specified procedure should be called from the Main entry point.
Before executing the example, the tree map looks as shown on the IVZTreeMap interface description page. Set different shades of red as color fill in the tree map:
Sub UserProc;
Var
Metabase: IMetabase;
EaxAnalyzer: IEaxAnalyzer;
TreeMap: IVZTreeMap;
ColorVisual: IVZColorVisual;
ColorMapping: IVZDataSourceMapping;
Scale: IVZDataScale;
i: Integer;
Item: IGxSolidBrush;
Color: IGxColor;
Begin
// Get the current repository
Metabase := MetabaseClass.Active;
// Get express report
EaxAnalyzer := Metabase.ItemById("EXP").Edit As IEaxAnalyzer;
// Get tree map
TreeMap := EaxAnalyzer.TreeMap.TreeMap;
// Get color visualizer
ColorVisual := TreeMap.ColorVisual;
// Get settings for data mapping with colors
ColorMapping := ColorVisual.ColorMapping;
// Get color scale
Scale := ColorMapping.Scale;
// Iterate over all scale elements
For i := 0 To Scale.ItemsCount - 1 Do
// Get scale element
Item := Scale.Item(i) As IGxSolidBrush;
// Create red color
Color := New GxColor.CreateRGB(255 - 40 * i, 0, 0);
// Set created color for current scale element
Item.Color := Color;
End For;
// Set updated scale
ColorMapping.Scale := Scale;
// Get express report
(EaxAnalyzer As IMetabaseObject).Save;
End Sub UserProc;
After executing the example tree map leaves are colored with different shades of red:
See also: