Steema Central

Posted: **Thu Jul 06, 2006 10:51 am**

Hi,

after Narcis helped me to get the z-values of my colorgrid the next problem became visible.

I defined custom colors for the colorgrid --> see below:

Code: Select all

        With .Series(1)

            With .asColorGrid
                .AddPalette -3, &H0

                .UseColorRange = False
                .UsePalette = True
                .ClearPalette

                .AddPalette -3, RGB(204, 0, 0)
                .AddPalette -2.75, RGB(221, 0, 0)
                .AddPalette -2.5, RGB(238, 0, 0)
                .AddPalette -2.25, RGB(255, 0, 0)
                .AddPalette -2, RGB(255, 68, 0)
                .AddPalette -1.75, RGB(255, 102, 0)
                .AddPalette -1.5, RGB(255, 136, 0)
                .AddPalette -1.25, RGB(255, 170, 0)
                .AddPalette -1, RGB(255, 204, 0)
                .AddPalette -0.75, RGB(255, 238, 0)
                .AddPalette -0.5, RGB(255, 255, 68)
                .AddPalette -0.25, RGB(255, 255, 187)
                .AddPalette 0, RGB(255, 255, 255)
                .AddPalette 0.25, RGB(153, 255, 153)
                .AddPalette 0.5, RGB(85, 255, 85)
                .AddPalette 0.75, RGB(34, 255, 34)
                .AddPalette 1, RGB(0, 238, 0)
                .AddPalette 1.25, RGB(0, 204, 0)
                .AddPalette 1.5, RGB(0, 170, 0)
                .AddPalette 1.75, RGB(0, 136, 0)
                .AddPalette 2, RGB(0, 0, 204)
                .AddPalette 2.25, RGB(0, 0, 170)
                .AddPalette 2.5, RGB(0, 0, 136)
                .AddPalette 2.75, RGB(0, 0, 102)
                .AddPalette 3, RGB(0, 0, 68)
            
                .IrregularGrid = True
        
            End With

        End With

But the colors are now displayed accordingly.
So for a value of 1 it displays the color for value > 2

I have no clue. Please help.

Kind regards,

Jan

Posted: **Thu Jul 06, 2006 11:18 am**

Hi Jan,

It works fine for me here using the code below and TeeChart Pro v7.0.0.8 ActiveX. Can you please test if this works at your end?

Code: Select all

         With .asColorGrid
             .ClearPalette
             .UseColorRange = False
             .UsePalette = True
             
             '.AddPalette -3, &H0
    
             .AddPalette -3, RGB(204, 0, 0)
             .AddPalette -2.75, RGB(221, 0, 0)
             .AddPalette -2.5, RGB(238, 0, 0)
             .AddPalette -2.25, RGB(255, 0, 0)
             .AddPalette -2, RGB(255, 68, 0)
             .AddPalette -1.75, RGB(255, 102, 0)
             .AddPalette -1.5, RGB(255, 136, 0)
             .AddPalette -1.25, RGB(255, 170, 0)
             .AddPalette -1, RGB(255, 204, 0)
             .AddPalette -0.75, RGB(255, 238, 0)
             .AddPalette -0.5, RGB(255, 255, 68)
             .AddPalette -0.25, RGB(255, 255, 187)
             .AddPalette 0, RGB(255, 255, 255)
             .AddPalette 0.25, RGB(153, 255, 153)
             .AddPalette 0.5, RGB(85, 255, 85)
             .AddPalette 0.75, RGB(34, 255, 34)
             .AddPalette 1, RGB(0, 238, 0)
             .AddPalette 1.25, RGB(0, 204, 0)
             .AddPalette 1.5, RGB(0, 170, 0)
             .AddPalette 1.75, RGB(0, 136, 0)
             .AddPalette 2, RGB(0, 0, 204)
             .AddPalette 2.25, RGB(0, 0, 170)
             .AddPalette 2.5, RGB(0, 0, 136)
             .AddPalette 2.75, RGB(0, 0, 102)
             .AddPalette 3, RGB(0, 0, 68)
        
             .IrregularGrid = True
             
             For X = -5 To 5 Step 0.25
               For Z = -5 To 5 Step 0.25
                    .AddXYZ X, Z, Z, "", clTeeColor
               Next Z
             Next X
    
         End With

Posted: **Fri Jul 07, 2006 6:46 am**

Hi Narcis,

now the colors are correct - but I don't know why. The only thing I did was changing two values and now everything is fine. When the colors were wrong one other thing was strange - getting z-values by clicked event worked but only for 95% of the chart --> from left to right the first 95%.

This is also gone... so everything is fine.

Besides, I use .asColorGrid.AddArrayXYZ to populate the grids but it is somewhat slow (65x480 points). Is there a faster possibility? Also axis scrolling is quiet slow - perhaps there are speed traps to avoid ?

Thanks again for your fast reply.

Kind regards,

Jan

Posted: **Mon Jul 10, 2006 9:54 am**

Hi Jan,

Besides, I use .asColorGrid.AddArrayXYZ to populate the grids but it is somewhat slow (65x480 points). Is there a faster possibility?

The AddArrayXYZ method should be the faster one.

Also axis scrolling is quiet slow - perhaps there are speed traps to avoid ?

This depends on the number of points, I'm afraid there's not anything we can do to speed it.

Steema Central

Wrong colors in Colorgrid

Wrong colors in Colorgrid

Works now and I have no idea why...