Jump to content


jamiguel77's Content

There have been 8 items by jamiguel77 (Search limited from 20-April 23)


By content type

See this member's

Sort by                Order  

#20693 Best way for load 50,000 rows (best speed)

Posted by jamiguel77 on 27 December 2019 - 09:39 AM in General Discussion

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

 

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

 

:(




#20692 Best way for load 50,000 rows (best speed)

Posted by jamiguel77 on 27 December 2019 - 08:55 AM in General Discussion

hi 

 

how to load 50 000 rows (with 30 columns) best way? best speed.

 

i have 2 options:

 

1) Text File:

 

#9#9#9'20191122'#9#9'1400067806'#9'KR'#9'22.11.2019'#9#9#9'-7,550.00'#9'MXN'#9'200031621'#9'CAJA DE AHORRO LCM2 SEM 46'#9'CAJA DE AHORRO'

 

2) i have this text file (Separated by columns) in a mysql database..

 

 

Thanks

 




#20686 Open Old D7 Project on Rio and get this error: TNextGrid not found

Posted by jamiguel77 on 06 December 2019 - 08:32 AM in General Discussion

hi, why? i get this error when open in Rio (its a old D7 project) 

 

TNextGrid not found

 

of course in Rio i have installed NextGrid and i have a component Named TnextGrid6 how to convert?

 

Thanks

 

 




#20684 Where to Download nextgrid for Delphi 10.3 Rio

Posted by jamiguel77 on 05 December 2019 - 05:20 PM in General Discussion

Hi Boki nice to see you, i dont publish in last 7 years so so..

 

where can download the NexGrid for Rio?

 

Thanks




#20645 Font face in cell

Posted by jamiguel77 on 11 August 2019 - 07:54 PM in NextGrid Component

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;



#20644 Font face in cell

Posted by jamiguel77 on 11 August 2019 - 07:43 PM in NextGrid Component

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



#20643 ReadOnly on indivual cell

Posted by jamiguel77 on 11 August 2019 - 07:26 PM in NextGrid Component

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

 

thanks




#20642 Font face in cell

Posted by jamiguel77 on 11 August 2019 - 07:23 PM in NextGrid Component

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