insert a line on a Group

Post Reply
User avatar
Silvio.Falconi
Posts: 7232
Joined: Thu Oct 18, 2012 7:17 pm
Been thanked: 16 times

insert a line on a Group

Post by Silvio.Falconi »

Image

I want to insert a black line between the group header and the first record of the group,

The vertical position (oRep:nRow) is not updated correctly.

even if I do it this way

Code: Select all | Expand

oRep:bPostGroup := { || oRep:Line(oRep:nRow + 5, 0, oRep:nRow + 5, oRep:nWidth, 1, CLR_BLACK) }
nothing happens
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
Posts: 7232
Joined: Thu Oct 18, 2012 7:17 pm
Been thanked: 16 times

Re: insert a line on a Group

Post by Silvio.Falconi »

I tried to insert a line dotted but then not add a space

Image

Code: Select all | Expand

 oRep:bStartGroup := { |oGroup| oRep:Say(oRep:nMargin, Replicate("-", oRep:nWidth / 10), 1, RPT_LEFT, oRep:nRow + 5, , , CLR_BLACK),;
                                     oRep:nRow := oRep:nRow + 10 }
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
Post Reply