Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > API de Windows
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 27-01-2023
jalcantara jalcantara is offline
Registrado
 
Registrado: ene 2023
Posts: 8
Poder: 0
jalcantara Va por buen camino
Ejecutar OutLook

Saludos a todos,

Tengo el siguiente código para ejecutar Outlook.
Código Delphi [-]
ShellExecute(0, 'open', 'outlook', nil, nil,SW_SHOWNORMAL)

lo hace bien, pero quiero que lo ejecute solo si no esta abierto.

Última edición por Neftali [Germán.Estévez] fecha: 27-01-2023 a las 11:00:25. Razón: Añadir TAGs al código
Responder Con Cita
  #2  
Antiguo 27-01-2023
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.233
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Recuerda añadir TAGs al código cuando lo añadas a los mensajes.

Cita:
Empezado por jalcantara Ver Mensaje
Tengo el siguiente código para ejecutar Outlook.
Código Delphi [-]
ShellExecute(0, 'open', 'outlook', nil, nil,SW_SHOWNORMAL)
lo hace bien, pero quiero que lo ejecute solo si no esta abierto.
Puedes "buscar" de varias formas si outlook está abierto antes de lanzar la ejecución.
La forma más sencilla es utilizando FindWindows. Si buscas en los foros por esa palabra encontrarás muchos mensajes y código de ejemplo.

Resumiendo, con esta función puedes buscar una ventana (perteneciente a un programa) utilizando su título o el nombre de su clase.
Lo bueno es que es simple, lo malo es que no siempre es igual de fiable.
  • Si buscas por el título, durante la ejecución de un programa (pasa en el caso de outlook) el título cambia, así que esta opción no es viable.
  • Si buscas por el nombre de la clase, es posible que en diferentes versiones de tu programa ese nombre también cambie.
En el caso de outlook, por ejemplo yo tengo la versión de escritorio:
"Microsoft® Outlook® para Microsoft 365 MSO (versión 2202 compilación 16.0.14931.20648) de 32 bits"

Para estar versión, la clase para la ventana principal se llama: "rctrl_renwnd32", así que este código funciona como piides:

Código Delphi [-]
var
  h: HWND;
begin
  // Buscar outlook por la clase de ventana principal
  h := FindWindow('rctrl_renwnd32', nil);
  // Lo ha encontrado?
  if (h <> 0) then
    ShowMessage('Ya se ha encontrado una instancia de Outlook abierta')
  else
    ShellExecute(0, 'open', 'outlook', nil, nil,SW_SHOWNORMAL);
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #3  
Antiguo 27-01-2023
jalcantara jalcantara is offline
Registrado
 
Registrado: ene 2023
Posts: 8
Poder: 0
jalcantara Va por buen camino
Excelente Neftali,

También me funciona para la versión Outlook 2016 64bit.

Solo tendría que averiguar como saber la clase de ventana principal de una aplicación x

me explico como supiste que rctrl_renwnd32 es la clase de ventana principal de tu versión de Outlook
Responder Con Cita
  #4  
Antiguo 30-01-2023
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.233
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por jalcantara Ver Mensaje
Solo tendría que averiguar como saber la clase de ventana principal de una aplicación x
me explico como supiste que rctrl_renwnd32 es la clase de ventana principal de tu versión de Outlook
Hay aplicaciones para revisar las ventanas abiertas en un momento dado o incluso seleccionar una ventana y obtener información sobre ella.
WinExpde nirsoft
Spy for Windows 9x/NT de Krichmar Kobi (lo he subido al FTP del club)

Aunque si buscas, encontrarás más.

__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
Ejecutar Rave Designer sin ejecutar IDE Delphi rmendoza83 Impresión 0 09-01-2009 20:44:56
Alternativa OutLook Io Varios 4 26-12-2007 12:08:19
Outlook Alejandro73 Varios 2 22-08-2006 22:57:55
Outlook Mario1980 Varios 0 04-07-2005 18:44:13
Ejecutar un exe Delphi desde OutLook Alexander Varios 3 30-06-2004 18:51:42


La franja horaria es GMT +2. Ahora son las 02:00:44.


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