Как сделать окно как Windows 7 Urifications Multouts, (WS_THICKFRAME, но нерешитель)

Я только что сделал здесь небольшое приложение здесь в Delphi 7, который имитирует значки системы по умолчанию, как громкость, Батарея, часы, сеть.

Я пытаюсь следовать всем рекомендациям Microsoft здесь http://msdn.microsoft.com/en-us/library/aaa511448.aspx#flouts

, чтобы окно выглядеть как вспышка, я Используя этот код:

//declaration

TForm1 = class(TForm)

protected
  procedure CreateParams(var Params: TCreateParams); override;
end;

Реализация

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.Style := WS_POPUP or WS_THICKFRAME;
  Params.ExStyle := Params.ExStyle or WS_EX_TOPMOST;
end;

Моя проблема - это WS_THICKFrame позволяет пользователю изменять размер окна. Как я могу это исправить?