KeepTogether = True in TppRegion object doesn't render properly in next page

rbuser

Hi,

I have a TppRegion control and there are few controls in the region
arrange in 2 rows. These are the controls:

object ppDetailBand3: TppDetailBand
Background1.Brush.Style = bsClear
Background2.Brush.Style = bsClear
PrintHeight = phDynamic
mmBottomOffset = 0
mmHeight = 21431
mmPrintPosition = 0
object ppRegion1: TppRegion
DesignLayer = ppDesignLayer4
UserName = 'Region1'
KeepTogether = True
Caption = 'Region1'
ParentWidth = True
Pen.Style = psClear
Stretch = True
mmHeight = 16669
mmLeft = 0
mmTop = 2915
mmWidth = 201930
BandType = 4
LayerName = Foreground3
mmBottomOffset = 0
mmOverFlowOffset = 0
mmStopPosition = 0
mmMinHeight = 0
object ppDBText1: TppDBText
DesignLayer = ppDesignLayer4
UserName = 'DBText6'
BlankWhenZero = True
Border.Weight = 1.000000000000000000
DataField = 'UnitPrice'
DataPipeline = Document_Detail
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Tahoma'
Font.Size = 8
Font.Style = []
ParentDataPipeline = False
TextAlignment = taRightJustified
Transparent = True
DataPipelineName = 'Document_Detail'
mmHeight = 3440
mmLeft = 141288
mmTop = 3968
mmWidth = 15081
BandType = 4
LayerName = Foreground3
end
object DBMemo1: TppDBMemo
DesignLayer = ppDesignLayer4
UserName = 'DBMemo1'
Border.Weight = 1.000000000000000000
CharWrap = False
DataField = 'Description'
DataPipeline = Document_Detail
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Tahoma'
Font.Size = 8
Font.Style = []
ParentDataPipeline = False
RemoveEmptyLines = False
Stretch = True
DataPipelineName = 'Document_Detail'
mmHeight = 4233
mmLeft = 39952
mmTop = 3968
mmWidth = 78846
BandType = 4
LayerName = Foreground3
mmBottomOffset = 0
mmOverFlowOffset = 0
mmStopPosition = 0
mmMinHeight = 0
mmLeading = 0
end
object DBText7: TppDBText
DesignLayer = ppDesignLayer4
UserName = 'DBText7'
BlankWhenZero = True
Border.Weight = 1.000000000000000000
DataField = 'Qty'
DataPipeline = Document_Detail
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Tahoma'
Font.Size = 8
Font.Style = []
ParentDataPipeline = False
TextAlignment = taRightJustified
Transparent = True
DataPipelineName = 'Document_Detail'
mmHeight = 3440
mmLeft = 116946
mmTop = 3968
mmWidth = 13758
BandType = 4
LayerName = Foreground3
end
object DBText8: TppDBText
DesignLayer = ppDesignLayer4
UserName = 'DBText8'
Border.Weight = 1.000000000000000000
DataField = 'UOM'
DataPipeline = Document_Detail
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Tahoma'
Font.Size = 8
Font.Style = []
Transparent = True
DataPipelineName = 'Document_Detail'
mmHeight = 3440
mmLeft = 132027
mmTop = 3968
mmWidth = 8996
BandType = 4
LayerName = Foreground3
end
object ppDBText2: TppDBText
DesignLayer = ppDesignLayer4
UserName = 'DBText9'
BlankWhenZero = True
Border.Weight = 1.000000000000000000
DataField = 'AmountWithTax'
DataPipeline = Document_Detail
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Tahoma'
Font.Size = 8
Font.Style = []
ParentDataPipeline = False
TextAlignment = taRightJustified
Transparent = True
DataPipelineName = 'Document_Detail'
mmHeight = 3440
mmLeft = 171715
mmTop = 3968
mmWidth = 18521
BandType = 4
LayerName = Foreground3
end
object DBCalc1: TppDBCalc
DesignLayer = ppDesignLayer4
UserName = 'DBCalc1'
Border.Weight = 1.000000000000000000
DataField = 'Number'
DataPipeline = Document_Detail
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Tahoma'
Font.Size = 8
Font.Style = []
TextAlignment = taCentered
Transparent = True
DBCalcType = dcCount
DataPipelineName = 'Document_Detail'
mmHeight = 3440
mmLeft = 794
mmTop = 3968
mmWidth = 12171
BandType = 4
LayerName = Foreground3
end
object ppDBText3: TppDBText
DesignLayer = ppDesignLayer4
UserName = 'DBText3'
Border.Weight = 1.000000000000000000
DataField = 'DISC'
DataPipeline = Document_Detail
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Tahoma'
Font.Size = 8
Font.Style = []
TextAlignment = taRightJustified
DataPipelineName = 'Document_Detail'
mmHeight = 3440
mmLeft = 156634
mmTop = 3968
mmWidth = 15081
BandType = 4
LayerName = Foreground3
end
object ppDBText7: TppDBText
DesignLayer = ppDesignLayer4
UserName = 'DBText5'
Border.Weight = 1.000000000000000000
DataField = 'ItemCode'
DataPipeline = Document_Detail
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Tahoma'
Font.Size = 8
Font.Style = []
Transparent = True
DataPipelineName = 'Document_Detail'
mmHeight = 3440
mmLeft = 12965
mmTop = 3968
mmWidth = 25400
BandType = 4
LayerName = Foreground3
end
object ppDBMemo2: TppDBMemo
DesignLayer = ppDesignLayer4
UserName = 'DBMemo2'
Border.Weight = 1.000000000000000000
CharWrap = False
DataField = 'Description2'
DataPipeline = Document_Detail
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Name = 'Tahoma'
Font.Size = 8
Font.Style = []
ParentDataPipeline = False
RemoveEmptyLines = False
Stretch = True
DataPipelineName = 'Document_Detail'
mmHeight = 4233
mmLeft = 39952
mmTop = 8731
mmWidth = 78846
BandType = 4
LayerName = Foreground3
mmBottomOffset = 0
mmOverFlowOffset = 0
mmStopPosition = 0
mmMinHeight = 0
mmLeading = 0
end
end
end


If the detail dataset has many records that render to 2 pages, the upper
row controls in the TppRegion will not show for top row in page 2.

--
Best regards,
Chau Chee Yang

nardmoseley

Hi Chau Chee Yang,

There is a patch available for RB 17.01, build 65 that resolves this issue.
Registered RB 17.01 developers can email support@ and request the patch.

I just emailed it to you


Best regards,

-
Nard Moseley
Digital Metaphors
www.digital-metaphors.com