CreateParams方法用来设定元件的视窗式样及其它必须传递至 CreateWindowEx API 的 参数。要改变元件的视窗式样，例如增加或拿掉元件的垂直卷轴只要改写 CreateParams 方法：
procedure TMyControl.CreateParams(var Params: TCreateParams);begininherited CreateParams(Params);if IWantAScrollBar thenParams.Style := Params.Style or WS_VSCROLLelseParams.Style := Params.Style and not WS_VSCROLL;end（本文来源于图老师网站，更多请访问http://m.tulaoshi.com/bianchengyuyan/）
