[[duilioisola]]

Para debugar pon un TMemo en la ventana principal y un timer que ejecute algo que te muestre las ventanas de Screen.

Ejemplo

Código Delphi [-]
procedure TFMPrincipal.OnTimer(Sender: TObject);
var
  i : integer;
  s : string;
begin
  inherited;
  // Limpio el memo
  MDebug.Lines.Clear;

  // Recorro las ventanas de Screen
  for i := 0 to Screen.FormCount -1 do
  begin
    if Assigned(Screen.Forms[i]) then
       s := 'Assigned'
    else
       s := 'NOT Assigned';

    // Nro de ventana, Nombre y si apunta a un formulario nulo
    MDebug.Lines.Add(format('%d - Formulario: %s - %s', [i, Screen.Forms[i].Name, s]));
  end;
end;