Bagong

 

Probably something like this:

procedure TFLinPM.CoLinStaStyleText(Sender: TObject; ACol, ARow: Integer;
  var FontColor: TColor; FillColor: TColor; var FontStyle: TFontStyles;
  CellValue: INxBase; CellState: TNxCellPaintingState);
begin
 
if ACol = 12 then
  if CellValue.AsString = 'Closed' then
    begin
       FontColor := clGreen;
    end;
end;

Hi Boki, 

that code will make green color just for its column.

I need the green color in arow with status "Closed".

I have no problem with version 5, cause there was a cellformating event there.

Hi,

 

You are pretty close to the solution. You just need to set var parameters from this procedure, such as FontColor, FontStyle or FillColor, but not set properties of columns. 

could you write the code should be..

a simple thing, please convert this code (ver 5)

procedure TForm1.NextGrid1CellFormating(Sender: TObject; ACol, ARow: Integer; var TextColor: TColor; var FontStyle: TFontStyles; CellState: TCellState);

begin

if (ACol = 3) and not(csSelected in CellState) then

begin

TextColor := clRed;

FontStyle := [fsBold];

end;

end;

to ver 6th.

my goal is gives possibility to set custom Font TColor or TFontStyle based on ACol and ARow parameters.

Hello,

 

There is an event for Column (you need to select the column) and the you have an event for styling cell text. It have very much the same var parameters.

 

I hope that this helps.

could you please make an example code