Jump to content


Photo

how to simulate: Nextgrid1.cell[Acol,Arow].font.color:=clred


  • Please log in to reply
4 replies to this topic

#1 jamiguel77

jamiguel77
  • Members
  • 137 posts
  • Gender:Male

Posted 23 March 2013 - 06:40 PM

Hi boki, i am search a similar topic in the forum but by moment not found.

i have these data:

Money Amount ExchRate
Dlls 1,000 10.00
Mx 150,000 1.00

Dlls 3,000 10.00

Dlls 500 10.00
Mx 170,000 1.00


i want: if ExchRate<>'1.00' then
change the font color of the cell to blue

thanks

#2 Boki (Berg)

Boki (Berg)

    Boki (Berg)

  • Forum Admin
  • PipPipPipPipPip
  • 8,191 posts
  • Gender:Male

Posted 23 March 2013 - 07:20 PM

Hello,

You may use OnCellFormating event where you may check your cell (with using ARow and ACol params) and then set TextColor property.
boki@bergsoft.net | LinkedIn Profile
--
BergSoft Home Page: www.bergsoft.net
Users Section: users.bergsoft.net
Articles and Tutorials: help.bergsoft.net (Developers Network)
--
BergSoft Facebook page
--
Send us applications made with our components and we will submit them on: www.bergsoft.net/apps.htm. Link to this page will be also set on home page too.

#3 jamiguel77

jamiguel77
  • Members
  • 137 posts
  • Gender:Male

Posted 23 March 2013 - 07:35 PM

yes! done!



procedure TFkartera.NgCellFormating(Sender: TObject; ACol, ARow: Integer;
var TextColor: TColor; var FontStyle: TFontStyles;
CellState: TCellState);
begin
if ng.Cell[8,Arow].asstring<>'1.00' then
begin
if Acol=5 then
TextColor:=clred
end
else if Acol=4 then
TextColor:=clred
end;



#4 jamiguel77

jamiguel77
  • Members
  • 137 posts
  • Gender:Male

Posted 23 March 2013 - 08:02 PM

strange:
colors:

clgreen, clolive notwork (always see clblackcolor)

the colors thatworked: clred, clblue, claqua

thanks

#5 Boki (Berg)

Boki (Berg)

    Boki (Berg)

  • Forum Admin
  • PipPipPipPipPip
  • 8,191 posts
  • Gender:Male

Posted 24 March 2013 - 02:25 AM

Hi,

Maybe something is wrong with your Delphi version?
boki@bergsoft.net | LinkedIn Profile
--
BergSoft Home Page: www.bergsoft.net
Users Section: users.bergsoft.net
Articles and Tutorials: help.bergsoft.net (Developers Network)
--
BergSoft Facebook page
--
Send us applications made with our components and we will submit them on: www.bergsoft.net/apps.htm. Link to this page will be also set on home page too.




1 user(s) are reading this topic

0 members, 1 guests, 0 anonymous users