Capturar el handle a subclases....(deshabilitar barra de inicio)

[JuanErasmo]

Buenos dias.
Mira, ahora tengo un problema grande....cualdo oculto por ejemplo el yahoo...
lo hago asi....

 
ShowWindow  (FindWindow("IMClass",NULL),SW_HIDE);

pero solo me oculta 1 ventana...lo he intendado con un for....pero tampoco funciona.....como puedo hacer?
Gracias!

[[seoane]]

Yo sigo contestándote en Delphi, espero que no te moleste Para encontrar todas las ventanas tenemos dos opciones, utilizar un bucle con la función FindWindowEx o usar la función EnumWindows. Te pongo las dos y decide tu.

Usando FindWindowEx en un bucle:

Código Delphi [-]
var
  Ventana: THandle;
begin
  Ventana:= FindWindowEx(0,0,'IMClass',nil);
  if Ventana > 0 then
  repeat
    // Si la ventana es visible la ocultamos y viceversa
    if isWindowVisible(Ventana) then
      ShowWindow(Ventana,SW_HIDE)
    else
      ShowWindow(Ventana,SW_SHOW);
    Ventana:= FindWindowEx(0,Ventana,'IMClass',nil);
  until Ventana = 0;
end;

Usando la función EnumWindows:

Código Delphi [-]
function EnumWindowsProc(Handle: Thandle; lParam: LPARAM): BOOL; stdcall;
var
  Buffer: PChar;
  Size: Integer;
begin
  Result:= TRUE;
  if PChar(lParam) <> nil then
  begin
    Size:= Strlen(PChar(lParam)) + 1;
    GetMem(Buffer,Size);
    try
      FillChar(Buffer^,Size,0);
      GetClassName(Handle,Buffer,Size);
      if StrIcomp(PChar(lParam), Buffer) = 0 then
        if isWindowVisible(Handle) then
          ShowWindow(Handle,SW_HIDE)
        else
          ShowWindow(Handle,SW_SHOW);
    finally
      Freemem(Buffer);
    end;
  end;
end;

// Para llamar la funcion
EnumWindows(@EnumWindowsProc, LPARAM(PChar('IMClass')));

[JuanErasmo]

Gracias.
Esta vez me va a ser un poco mas dificil pero lo puedo hacer.
Muchas gracias...
Una cosa mas.....sabes como deshabilitar los iconos del TryNotifyWnd, no hacerlos invisible sino, deshabilitarlos???
Gracias

[JuanErasmo]

Hola amigo..no he podido pasar al loop...como puedo hacer?
lo estoy haciendo asi:

 
HWND Ventana;
      for (int i=0;i<5;i++){
        Ventana = FindWindowEx(0,0,"ExploreWClass",NULL);
                if (Ventana>0){
                        if (IsWindowVisible(Ventana)){
                                ShowWindow(Ventana,SW_HIDE);
                         }
                         }
      }

gracias

[[seoane]]

Parece que traducir de Delphi a C no te resulta tan fácil. Haber que tal se me da a mi, aunque lo tengo un poco oxidado :

HANDLE Ventana;

  Ventana = FindWindowEx(0,0,"IMClass",NULL);
  if (Ventana)
  do {
    if (IsWindowVisible(Ventana)) 
      ShowWindow(Ventana,SW_HIDE);
    else
      ShowWindow(Ventana,SW_SHOW);
    Ventana = FindWindowEx(0,Ventana,"IMClass",NULL);
  } while (Ventana);

[Ñuño Martínez]

Seoane: deja algo para los demás, leñe, que también queremos ayudar, jó... Estaba a puntito a puntito...

[[seoane]]

Empezado por Ñuño Martínez

Seoane: deja algo para los demás, leñe, que también queremos ayudar, jó... Estaba a puntito a puntito...

Si lo se te lo dejo a ti, no tengo ningún IDE para C instalado y tuve que compilarlo desde la linea de comandos para comprobar que todo estaba en sus sitio.

[roman]

¿No se puede así?

Ventana = 0;

while (Ventana = FindWindowEx(0,Ventana,"IMClass",NULL))
{
  if (IsWindowVisible(Ventana)) 
    ShowWindow(Ventana,SW_HIDE);
  else
    ShowWindow(Ventana,SW_SHOW);
}

// Saludos

[[seoane]]

Empezado por roman

¿No se puede así?

Muy cierto. Mi código era una traducción punto por punto del código en delphi, y no aproveche todas las características del C. Pero sera mejor no empezar como la última vez que me caliento y termino haciéndolo en ensamblador Es broma.

http://www.clubdelphi.com/foros/showthread.php?t=35085