Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 05-04-2006
Avatar de Cabanyaler
Cabanyaler Cabanyaler is offline
Miembro
 
Registrado: jun 2003
Ubicación: País Valencià
Posts: 339
Poder: 21
Cabanyaler Va por buen camino
Unhappy Ocultar la barra de tareas durante la exe de la aplicación

Hola, compañeros.
Necesitaría ocultar la barra de tareas de WXP durante la ejecución de mi aplicación, para de ese modo tener la aplicación en su form ocupando toda el area de trabajo de la pantalla y que se viese toda su extensión.
He probado con el truco de trucomania con las órdenes:
Código Delphi [-]
ShowWindow(FindWindow('Shell_TrayWnd',nil), SW_HIDE);
ShowWindow(FindWindow('Shell_TrayWnd',nil), SW_SHOWNA);
Pero no me oculta nada.
Tb he probado con este código, por si el anterior era sólo para W98, Home, NT
Código Delphi [-]
// Para ocultarla: 
ShowWindow(Application.Handle, SW_HIDE);
//Para mostrarla:
ShowWindow(Application.Handle, SW_SHOW);

He buscado por el foro, pero no he encontrado nada que me la oculte.
He introducido el código tanto ántes como después de ...
Código Delphi [-]
Application.Run;
así como en los eventos OnClose y OnCreate del form principal, pero nada.

Si conocéis como hacerlo, os lo agredecería.
Un saludo y gracias.
__________________
El meu país és tan petit, que des de dalt d'un campanar es pot veure el campanar veí.
Responder Con Cita
  #2  
Antiguo 05-04-2006
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Prueba con las siguientes propiedades del formulario principal de tu aplicación:

Código Delphi [-]
BorderStyle := bsNone;
WindowState := wsMaximized;
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
  #3  
Antiguo 05-04-2006
Avatar de Bicho
[Bicho] Bicho is offline
Miembro Premium
 
Registrado: jul 2003
Ubicación: Inca - Mallorca
Posts: 1.776
Poder: 22
Bicho Va por buen camino
Pos a mi me funciona

Pues yo he probado esto:

Código Delphi [-]
ShowWindow(FindWindow('Shell_TrayWnd',nil), SW_HIDE);

en un WinXP y funciona perfectamente.

Si vas a usar lo que te ha comentado dec, ten en cuenta que tu aplicación no tendrá la barra de arriba, con lo que no podrás cerrarla, a menos que tengas un botón para cerrar.

Saludos
Responder Con Cita
  #4  
Antiguo 05-04-2006
Avatar de Cabanyaler
Cabanyaler Cabanyaler is offline
Miembro
 
Registrado: jun 2003
Ubicación: País Valencià
Posts: 339
Poder: 21
Cabanyaler Va por buen camino
Oh, gracias. Según el código de el "bicho" , me funciona correctamente, la barra desaparece. No sé porque antes no me funcionaba.
Pero, y siempre hay un pero, si minimizo la aplicación, cosa que harán los usuarios a lo largo del día para trabajar con otras aplicaciones, no se puede ver la barra para elegir cualquier otra tarea o aplicación que tuviesen minimizada.
Lo que deseo es que la barra se comporte como si tuviese en sus propiedades la opción:
"Ocultar automáticamente la barra de tareas", seleccionada, es decir, al pasar el cursor por la parte inferior de la pantalla, que esta emergiese.
Gracias.
__________________
El meu país és tan petit, que des de dalt d'un campanar es pot veure el campanar veí.

Última edición por Cabanyaler fecha: 05-04-2006 a las 16:12:02.
Responder Con Cita
  #5  
Antiguo 05-04-2006
Kosmo Kosmo is offline
Miembro
 
Registrado: abr 2006
Posts: 21
Poder: 0
Kosmo Va por buen camino
Onminimize

Si pegas un ApplicationEvents verás que hay un OnMinimize, que podrías usar para hacer que aparezca otra vez la barra de tareas. Lo que pasa es que solo se dispararía en el caso del formulario principal si no recuerdo mal.

De todas formas, una solución mas chapucera sería utilizar el evento OnResize del formulario, el cual se dispara despues de toda modificacion de tamaño. Podrías preguntar el WindowState del formulario en cuestion y ver si es esta minimizado o no, asi en caso de que este minimizado (ya que el evento como digo se dispara despues del cambio de tamaño) puedes hacer aparcer la barra.

Espero te sirva de ayuda, saludos.
Responder Con Cita
  #6  
Antiguo 05-04-2006
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Poder: 29
Lepe Va por buen camino
En el ApplicationsEvents tienes el evento OnMinimize.


Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita
  #7  
Antiguo 05-04-2006
Avatar de Bicho
[Bicho] Bicho is offline
Miembro Premium
 
Registrado: jul 2003
Ubicación: Inca - Mallorca
Posts: 1.776
Poder: 22
Bicho Va por buen camino
Pero si es el mismo código que tu pusiste! no lo entiendo, pero en fin

Yo no se tus usuarios, pero los mios usan sin ningún problema el ALT + TAB para pasar de un programa a otro. Y de verdad que a algunos habría que quitarles el pc, por las barbaridades que hacen, pero mira tú, que el ALT + TAB lo tienen dominadísimo.

En cuanto a ejecutar algo cuando la aplicación se minimice, debes poner una ApplicationEvents y éste tiene el evento OnMinimize, allí podrás resturar la barra de tareas.

Saludos
Responder Con Cita
  #8  
Antiguo 05-04-2006
Avatar de Cabanyaler
Cabanyaler Cabanyaler is offline
Miembro
 
Registrado: jun 2003
Ubicación: País Valencià
Posts: 339
Poder: 21
Cabanyaler Va por buen camino
Uff, perdonad por las vueltas al tema, pero no me gusta. No me gusta, lo siento.
He hecho esto, de forma perfecta con el componente "ApplicationEvents":
Código Delphi [-]
procedure TFPrincipal.ApplicationEvents1Activate(Sender: TObject);
begin
    ShowWindow(FindWindow('Shell_TrayWnd',nil), SW_HIDE);
end;

procedure TFPrincipal.ApplicationEvents1Minimize(Sender: TObject);
begin
    ShowWindow(FindWindow('Shell_TrayWnd',nil), SW_SHOW);
end;

pero aún teniendo el form en su propiedad WindowState := maximize y Width, Heigth a todo lo que dá la pantalla, la barra me desaparece pero el form no me consume el espacio dejado por la barra desaparecida, y al minimizar la aplicación, no me muestra la barra.

No sé, pero bueno, no deja de ser una pejilleria de presentación, lo importante es que la aplicación funcione ok y eso lo hace, ya les sugeriré que dejen la configuración de ocultar automáticamente la barra, y si no lo hacen... es problema suyo. Del otro modo, si no les aparece la barra o se queda el espacio o cualquier otro tema, el culpable soy yo, y de eso amigos no hace falta que os explique nada.
Gracias, no obstante, a los dos.

Nota:
Presiosa localitat Inca i més bonita illa, el mal es que dones un puntelló a un cudol i surt un guiri tot bermell.
Preciosa localidad Inca y más bonita isla, lo malo es que das una patada a una piedra y sale un guiri to rojo.
__________________
El meu país és tan petit, que des de dalt d'un campanar es pot veure el campanar veí.

Última edición por Cabanyaler fecha: 05-04-2006 a las 17:25:06.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
No aparece la aplicación en barra de tareas Fernando Windows 7 30-09-2005 23:30:15
Aplicación invisible en la barra de tareas... Sinaloense Varios 2 02-02-2004 15:24:51
Ocultar tu aplicación de la barra de tareas DarkByte API de Windows 4 13-09-2003 16:11:32
ocultar aplicacion en la barra de tareas jlcasih API de Windows 5 11-09-2003 20:05:54
Ocultar tu aplicación de la barra de tareas DarkByte Varios 6 09-09-2003 11:18:41


La franja horaria es GMT +2. Ahora son las 15:24:36.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi