滚动控件绘图刷新问题

我做了个控件是从TScrollingWinControl继承而来，并且创建了一个TCanvas的私有对象在控件窗口客户区绘图，同时我截取了WM_PAINT消息进行图形的重绘：
procedure TTPTPreview.WMPaint(var Message: TWMPaint);
begin
    inherited;
    FCanvas.Refresh;
    FCanvas.TextOut(10,10,'Happy');
end;
在滚动消息处理过程中我也加了FCanvas.Refresh,但为什么运行程序后拖动滚动条时这个绘制的文本没有刷新显示(老是重叠显示,但当其它窗体遮住控件窗口区域后显示正常),为什么,没道理呀???