procedure TMyComboBox.CreateParams(var params: TCreateParams);
begin
inherited CreateParams(params);
with Params do
begin
Style:=style or ws_popup;
EXStyle:=EXStyle or WS_EX_CLIENTEDGE or WS_EX_TOOLWINDOW;
end;
end;
上面的代码的含义
...全文
1104打赏收藏
大家帮我解释一下
procedure TMyComboBox.CreateParams(var params: TCreateParams); begin inherited CreateParams(params); with Params do begin Style:=style or ws_popup; EXStyle:=EXStyle or WS_EX_CLIENTEDGE or WS_EX_TOOLWINDOW; end; end; 上面的代码的含义