TForm.Create Nombre dupplicados - Chat

[adonias]

Encontre esto en el foro.

Supuestamente deberia aplicarce para todos los form que se generen, pero solo funciona para el form1

Código Delphi [-]
procedure TForm1.CreateParams
   (var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.ExStyle := Params.ExStyle
                    or WS_EX_APPWINDOW;
end;

Alguna idea de lo que puede ser?