How to call CreateParams?

[i***@iconico.com]

I have the following code in my form to make a window transparent:

procedure TfrmGuides.CreateParams(var Params: TCreateParams); //
override;
begin
inherited;
if (MakeTrans) then begin
params.exstyle := params.ExStyle or WS_EX_TRANSPARENT;
end;
end;

The problem is that while the form is open I need to be able to change
the value of MakeTrans and have that update the window. How do I call,
or force a call to CreateParams?

[i***@iconico.com]

Solved it, I just call SetWindowLong instead.