Canvas.DrawLine(PointF(50 + I * 25, 0), PointF(50 + I * 25, ClientHeight), 1);
And here is the an example of DrawLine with the extra code that fixes the problem:
Canvas.DrawLine(PointF(50 + I * 25 – (Canvas.Stroke.Thickness / 2), 0),
PointF(50 + I * 25 – (Canvas.Stroke.Thickness / 2), ClientHeight), 1);
Roman has much more comprehensive example code on his blog and even a second method for correcting the problem.
Head over to read the full blog post about correcting DrawLine on TCanvas.