Jump to content


Photo

Individual Cell Formatting.


  • Please log in to reply
2 replies to this topic

#1 Speed

Speed
  • Members
  • 87 posts

Posted 18 June 2020 - 07:02 AM

Hi,

 

I'm testing out the idea of using TNextGrid6 as a scheduler/planner/appointment grid.

 

Is it possible to format the lines as shown in the attached image (a mockup of TNextGrid6)?

 

Thanks.

 

= Steve

Attached Files



#2 Boki (Berg)

Boki (Berg)

    Boki (Berg)

  • Forum Admin
  • PipPipPipPipPip
  • 7,893 posts
  • Gender:Male

Posted 20 June 2020 - 03:18 PM

Hello,

 

Maybe OnGetCellGrid event of a view can help you. Try something like this: 

 

procedure TForm2.NxReportGridView61GetCellGrid(Sender: TObject; ACol,
  ARow: Integer; var Edges: TNxBorderEdges; State: TNxCellPaintingState);
begin
  if ACol = 0 then
    Edges[beRight].Color := clWhite;
end;

boki@bergsoft.net | LinkedIn Profile
--
BergSoft Home Page: www.bergsoft.net
Members Section: bms.bergsoft.net
Articles and Tutorials: dn.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 Speed

Speed
  • Members
  • 87 posts

Posted 21 June 2020 - 03:43 AM

 

procedure TForm2.NxReportGridView61GetCellGrid(Sender: TObject; ACol,
  ARow: Integer; var Edges: TNxBorderEdges; State: TNxCellPaintingState);
begin
  if ACol = 0 then
    Edges[beRight].Color := clWhite;
end;

Thanks Boki, I'll give it a try.

 

= Steve






0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users