Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 09-01-2007
Avatar de BuenaOnda
BuenaOnda BuenaOnda is offline
Miembro
 
Registrado: feb 2006
Ubicación: La Serena - Chile
Posts: 347
Poder: 19
BuenaOnda Va por buen camino
Thumbs up Detectar si windows ejecuto mi aplicacion al Iniciar el Sistema

Hola amigos...

Tengo un pequeño porblemita, resulta que cargo mi aplicacion al iniciar windows( la cargo en el registro HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run ) y quisiera detectar si mi aplicacion ha sido cargada por windows o fue ejecutada, manualmente, por un usuario(por ej con un DobleClick)... muchas gracias..
Responder Con Cita
  #2  
Antiguo 09-01-2007
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Poder: 27
delphi.com.ar Va por buen camino
La forma mas sencilla que se me ocurre, es que cuando registras tu aplicación en el registro, le pongas un parámetro y evalues si esta ese parámetro para saber en que momento se cargó.

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita
  #3  
Antiguo 09-01-2007
genius genius is offline
Miembro
 
Registrado: may 2006
Posts: 38
Poder: 0
genius Va por buen camino
Red face

la mas sencillita

Hwndd := FindWindow(nil, 'Caption de tu aplicativo');

if Hwndd <> 0 then
Estoy arriba loko..
Responder Con Cita
  #4  
Antiguo 09-01-2007
Avatar de ArdiIIa
[ArdiIIa] ArdiIIa is offline
Miembro Premium
 
Registrado: nov 2003
Ubicación: Valencia city
Posts: 1.481
Poder: 22
ArdiIIa Va por buen camino
En la clave de registro añades un parámetro, considerando que el usuario no va a pasar ningún parámetro...
¿ como ?
__________________
Un poco de tu generosidad puede salvar la vida a un niño. ASÍ DE SENCILLO
Responder Con Cita
  #5  
Antiguo 09-01-2007
Avatar de BuenaOnda
BuenaOnda BuenaOnda is offline
Miembro
 
Registrado: feb 2006
Ubicación: La Serena - Chile
Posts: 347
Poder: 19
BuenaOnda Va por buen camino
Question

mmm... No he logrado darle solución a mi problemita, pense en utilizar un Parametro, en el registro de Windows, de la siguiente manera :

IF Parametro = 1 THEN
BEGIN
{ Aplicación ejecutada por Windows }
Parametro:=2;
END
ELSE { Aplicación ejecutada "Manualmente" }

el problema es que el paremetro siempre tendria valor 2, a no ser que lo actualizara en 1 cuando windows cerrara la sesión..
Responder Con Cita
  #6  
Antiguo 09-01-2007
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Poder: 27
delphi.com.ar Va por buen camino
Cita:
Empezado por BuenaOnda
mmm... No he logrado darle solución a mi problemita, pense en utilizar un Parametro, en el registro de Windows, de la siguiente manera :

IF Parametro = 1 THEN
BEGIN
{ Aplicación ejecutada por Windows }
Parametro:=2;
END
ELSE { Aplicación ejecutada "Manualmente" }

el problema es que el paremetro siempre tendria valor 2, a no ser que lo actualizara en 1 cuando windows cerrara la sesión..
Yo me refería a que agregues un parámetro en la línea de comandos, por ejemplo:
Cita:
miaplicacion.exe -runstart
Y desde código evalúes:
Código Delphi [-]
  if FindCmdLineSwitch('runstart') then
    { Lo ejecutó windows}

Cita:
Empezado por genius
la mas sencillita

Hwndd := FindWindow(nil, 'Caption de tu aplicativo');

if Hwndd <> 0 then
Estoy arriba loko..
No di una posibilidad similar (para ese caso crearía un semáforo), porque cabía la posibilidad que la aplicación aún no se encuentre en ejecución!

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
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
Intraweb, Como ejecuto una aplicacion tulio Internet 13 21-03-2018 22:50:30
Ejecutar aplicación al iniciar Windows nesetru Varios 5 10-02-2004 09:09:56
Como iniciar mi sistema, al inciar Windows thecarlos Varios 1 16-01-2004 00:11:38
Iniciar tu aplicacion al arancar windows JaMFrY Varios 4 05-01-2004 17:24:43
Como ejecuto una aplicacion externa a D5 kia Varios 3 25-08-2003 23:12:10


La franja horaria es GMT +2. Ahora son las 08:31:37.


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