Jump to content


jamiguel77

Member Since 06 May 2005
Offline Last Active Jun 03 2023 02:23 AM
-----

Posts I've Made

In Topic: Best way for load 50,000 rows (best speed)

27 December 2019 - 09:39 AM

Same time if addrow(50000) or one by one.

 

finally i need asign to every row / cell a value....

 

:(


In Topic: Font face in cell

11 August 2019 - 07:54 PM

i do the job:

 

(not like me but here the work):

 

procedure TFprocesa.NgCashCustomDrawCell(Sender: TObject; ACol,
  ARow: Integer; CellRect: TRect; CellState: TCellState);
var
  wvalor:String;  
begin
  if (Acol=10) then
  begin
    with NgCash.Columns[ACol].Display do
    begin
      wvalor:=NgCash.cell[Acol, Arow].AsString;
      if (strtofloat(wvalor)<0) then
      begin
        Canvas.Font.Size := 13;
        Canvas.Font.Style:=[fsbold];
        Canvas.Font.Color:=clred;
 
      end;
      AsString := NgCash.Cell[ACol, ARow].AsString;
      PaintBackground(NgCash.CellByName[ACol, ARow].Color, True);
      Paint;
    end;
  end;  
end;

In Topic: Font face in cell

11 August 2019 - 07:43 PM

i can do:

 

procedure TFprocesa.NgCashCellFormating(Sender: TObject; ACol,
  ARow: Integer; var TextColor: TColor; var FontStyle: TFontStyles;
  CellState: TCellState);
var
  wvalor:String;
begin
  if (Acol=10) then
  begin
    wvalor:=NgCash.cell[Acol, Arow].AsString;
    if (strtofloat(wvalor)<0) then
    begin
      TextColor:=clred;
      FontStyle:=[fsbold];
   end;
  end;  
end;
 
 
how to change font size?
 
thanks

In Topic: ReadOnly on indivual cell

11 August 2019 - 07:26 PM

i use d7 and nextgrid version 5.9.85 how to chnge font color for a specific cell?

 

thanks


In Topic: Font face in cell

11 August 2019 - 07:23 PM

Hi Friends, i downloaded last version of: nextgrid_d7.exe and the version is: 5.9.85

 

i am use D7

1) how to download version 6?

2) if cant, how to change the color of a specific cell: 

 

if strtodate(netduedate)<dpFechaDesde.date then
    begin
       wng.cell[10,wng.LastAddedRow].Color:=$00C2B4FC;
       wng.cell[9,wng.LastAddedRow].Font.size:=12;
        wng.cell[9,wng.LastAddedRow].Font.color:=#ff00ff;  // or clred
    end;
 
Thanks