首页 / 软件开发 / Delphi / 改变元件的视窗式样

改变元件的视窗式样2010-01-27CreateParams方法用来设定元件的视窗式样及其它必须传递至CreateWindowEx API的参数。要改变元件的视窗式样，例如增加或拿掉元件的垂直卷轴只要改写CreateParams方法：

procedure TMyControl.CreateParams（var Params: TCreateParams）;
begin
inherited CreateParams（Params）;
if IWantAScrollBar then
Params.Style := Params.Style or WS_VSCROLL
else
Params.Style := Params.Style and not WS_VSCROLL;
end