Steema Issues Database

Note: This database is for bugs and wishes only. For technical support help, if you are a customer please visit our online forums;
otherwise you can use StackOverflow.
Before using this bug-tracker we recommend a look at this document, Steema Bug Fixing Policy.



Bug 880 - Custom ColorGrid Palette resets
Summary: Custom ColorGrid Palette resets
Status: RESOLVED FIXED
Alias: None
Product: VCL TeeChart
Classification: Unclassified
Component: Series (show other bugs)
Version: 140220
Hardware: PC Windows
: Normal normal
Target Milestone: ---
Assignee: Steema Issue Manager
URL: http://www.teechart.net/support/viewt...
Keywords:
Depends on:
Blocks:
 
Reported: 2014-08-11 09:14 EDT by yeray alonso
Modified: 2014-08-11 09:56 EDT (History)
0 users

See Also:
Chart Series: ---
Delphi / C++ Builder RAD IDE Version:

Attachments
Custom ColorGrid palette lost (2.75 KB, application/octet-stream)
2014-08-11 09:14 EDT, yeray alonso 		Details
View All Add an attachment (proposed patch, testcase, etc.)

Note You need to log in before you can comment on or make changes to this bug.
Description yeray alonso 2014-08-11 09:14:39 EDT 
Created attachment 259 [details]
Custom ColorGrid palette lost

TeeSurfa.pas rev 1.36 (TeeChart v2014.10) introduced property IDirtyPalette that seems to break the palette the user defines in the example attached.

Here it is a possible fix, adding an "if" to TCustom3DPaletteSeries.NotifyValue

Procedure TCustom3DPaletteSeries.NotifyValue(ValueEvent:TValueEvent; ValueIndex:Integer);
begin
  inherited;
  if ValueEvent=veClear then
    IDirtyPalette:=True;
end;
Comment 1 yeray alonso 2014-08-11 09:31:47 EDT 
A better fix would probably be in TCustom3DPaletteSeries.CheckPaletteEmpty, changing this:

Procedure TCustom3DPaletteSeries.CheckPaletteEmpty;
begin
  if (Count>0) and ( (Length(FPalette)=0) or IDirtyPalette ) then
     CreateDefaultPalette;
end;

For this:

Procedure TCustom3DPaletteSeries.CheckPaletteEmpty;
begin
  if (Count>0) and ( (Length(FPalette)=0) or not IDirtyPalette ) then
     CreateDefaultPalette;
end;