Changes in ExcelColorPalette has no behaviour
Posted: Wed Dec 07, 2011 12:25 pm
In Delphi 2007 i tried to change colors in BIFFRecsII4.ExcelColorPalette, but it has no behavour in Using the Cell Colors. They are alwas the default values. Is there a bug, or what i'm doing wrong?
Example:
1)
ExcelColorPalette[24] := $FF0000;
Sheets[0].AsString[0,0] := 'X';
Sheets[0].Cell[0,0].FillPatternForeColor := TExcelColor(24); //-- no change behavour
2)
ExcelColorPalette[24] := $FF0000;
Sheets[0].AsString[0,0] := 'X';
Sheets[0].Cell[0,0].FillPatternForeColor := xc24; //-- no change behavour
3)
Palette[24] := $FF0000; //-- of TXLSReadWriteII4-Instance
Sheets[0].AsString[0,0] := 'X';
Sheets[0].Cell[0,0].FillPatternForeColor := xc24; //-- no change behavour
There are alwas shown the standard colours and not the red one i want to have.
By the way: I know that there is a standard value xcRed, but i want to have a special RGB-Value($95B7C7).
Example:
1)
ExcelColorPalette[24] := $FF0000;
Sheets[0].AsString[0,0] := 'X';
Sheets[0].Cell[0,0].FillPatternForeColor := TExcelColor(24); //-- no change behavour
2)
ExcelColorPalette[24] := $FF0000;
Sheets[0].AsString[0,0] := 'X';
Sheets[0].Cell[0,0].FillPatternForeColor := xc24; //-- no change behavour
3)
Palette[24] := $FF0000; //-- of TXLSReadWriteII4-Instance
Sheets[0].AsString[0,0] := 'X';
Sheets[0].Cell[0,0].FillPatternForeColor := xc24; //-- no change behavour
There are alwas shown the standard colours and not the red one i want to have.
By the way: I know that there is a standard value xcRed, but i want to have a special RGB-Value($95B7C7).