Devart Forums

If you using TCrDbGrid in CrGrid Unit may see "Integer Overflow" in scrolling grid.

This error becuse of title aligment .
if you have source of this unit , you can change this line to avoid of this error :
procedure WriteText(ACanvas: TCanvas; ARect: TRect; DX, DY: integer;
const Text: string; Alignment: TAlignment; ARightToLeft: boolean);
Begin
.
.
.

Left := ARect.Left + (ARect.Right - ARect.Left) shr 1
- (ACanvas.TextWidth(Text) shr 1);
change to :

/ --------------------------------------------------------------------------
// Modified By Vakili 2008/12/07 11:17:18
// Old orginal
// --------------------------------------------------------------------------

Left := ARect.Left + (ARect.Right - ARect.Left) Div 2
- (ACanvas.TextWidth(Text) Div 2);


Note : Shr 1 = Div 2

Thank you for the advice. We will fix this problem in the next SDAC build.

ur welcome