Problema al autoiniciar aplicación

[Casimiro Noteví]

Lo he quitado del 'OnCreate' y lo he pasado al 'OnActivate', le he añadido para que busque en el directorio donde está el ejecutable y ¡¡¡funciona!!!

procedure TForm1.FormActivate(Sender: TObject);
begin
  regedit(1);
  ShellExecute(Handle, '', PChar(ExtractFilePath(ParamStr(0))+'\gg.jpg'), '', '', SW_SHOWNORMAL);
end;

[rgstuamigo]

Bueno, aunque parece que Casimiro lo solucionó, solo una tengo una observacion a tu codigo y es este cuestionamiento:¿Por que cada ves que corre tu aplicacion lo registras en los registros de windows(autorun)?
¿Acaso no bastaria con registrarla una sola ves y ya?. Supongo que cada ves que se registra algo en los registros de Windows, el Sistema Operativo lo que hace es tomar en cuenta eso sólo la siguiente ves que se ejecute, es decir al Reiniciarse de nuevo(de ahí que cada ves que instalamos un programa, Windows nos pide que reiniciemos, cosa que segun he visto no sucede con Linux,pues ya diran los linuseros ), pero segun tu codigo, al reiniciarse de nuevo, pues nuevamente registra(Aunque en la misma Key) a tu aplicacion, y es un ciclo que se repite nuevamente....
Quisas lo que debieras hacer es: Antes de registrar tu aplicacion en los registros de Windows, primero deberias verificar si ya antes no se había registrado, para no estar nuevamente registrando..
Pruebalo...

[Casimiro Noteví]

Porque en linux no existe (menos mal) el registro de windows, ni el registro de linux

En linux cuando ejecutas un programa, éste mira su configuración y listo, no hace falta reiniciar tras una instalación o actualización.

[rgstuamigo]

Empezado por Casimiro Notevi

Porque en linux no existe (menos mal) el registro de windows, ni el registro de linux

En linux cuando ejecutas un programa, éste mira su configuración y listo, no hace falta reiniciar tras una instalación o actualización.

Waooooh , Casimiro...te las sabes todas.....
Ya esta todo apuntado..ahora lo entiendo...

[[Chris]]

Empezado por rgstuamigo

Supongo que cada ves que se registra algo en los registros de Windows, el Sistema Operativo lo que hace es tomar en cuenta eso sólo la siguiente ves que se ejecute, es decir al Reiniciarse de nuevo(de ahí que cada ves que instalamos un programa, Windows nos pide que reiniciemos, cosa que segun he visto no sucede con Linux,pues ya diran los linuseros )

Cuando cambias el registro no es necesario que el sistema se reinicie. Basta que lo haga la rutina que necesita los datos de X registro. Cuando es necesario un reinicio del sistema en Windows es porque alguna actualización o instalación de un programa necesita que las nuevas configuraciones de un servicio clave (principalmente) del sistema sean reiniciados. También cuando se necesita hacer un patch en archivos de programas que están abiertos y que por estabilidad del sistema no pueden detenerse como el Kernel o otro archivo del núcleo.

Saludos.

[rgstuamigo]

Apuntado..tambien.. Chris...
Saludos...

[bosster_018]

Amigo Casimiro... Perdón quise decir: Moderador CasimiroNotevi

El problema lo arreglaste totalmente. Pero no con poner el código en el OnAtivate del formulario, sino con esta parte:

Código Delphi [-]
ShellExecute(Handle, '', PChar(ExtractFilePath(ParamStr(0))+'\gg.jpg'), '', '', SW_SHOWNORMAL);

No se porque razón es que si uno no agrega el Path para ejecutar un archivos o mejor dicho localizar el archivo directamente como lo he escrito en el ejemplo:

Código Delphi [-]
ShellExecute(Handle,nil,('GG.JPG'),'','',SW_Shownormal);

No se ejecuta normalmente al iniciarse en Windows, pero sí al ejecutarlo manualmente

Parece que hace la diferencia al agregar "PChar(ExtractFilePath(ParamStr(0))+'\gg.jpg')"
en vez de poner directamente nombre del archivo que queremos localizar en ese momento (asumiendo que está en el mismo directorio)

Si lo esciribmos en el FormCreate y en el Botón con lo agregado anteriormente. Este ya puede ejecutarse normalment al iniciarse en Windows, osea FUNCIONA

Incluso se resolvió lo escrito anteriormente en este hilo:

realmente es necesario especificar el path?

La respuesta sería: SI

También les informo que con esa simple pero valiosa ayuda que me brindaron. pude terminar mi proyecto pues ya incluí el Path en la sentencia que fallaba al autoejecutarse al iniciar Windows.

MUCHAS GRACIAS amigos del ClubDelphi

La verdad... Ustedes ayudan bastante...
Perdonen si da chiste lo que voy a decir... Pero

USTEDES SON UNOS BENDITOS GENIOS

Saludos.. Y recuerden agregar el path aunque sea mas trabajoso.

[Casimiro Noteví]

Empezado por bosster_018

Amigo Casimiro... Perdón quise decir: Moderador CasimiroNotevi

Sigo siendo casimiro

Empezado por bosster_018

USTEDES SON UNOS BENDITOS GENIOS

Genios, sí, aquí hay algunos genios, pero yo no, lo único que tengo es 24 años programando y el email de quien conoce las respuestas

[[Chris]]

Empezado por Casimiro Notevi

Lo he quitado del 'OnCreate' y lo he pasado al 'OnActivate', le he añadido para que busque en el directorio donde está el ejecutable y ¡¡¡funciona!!!

El problema con el Evento OnActivate es que el código contenido será ejecutado cada vez que el formulario recupere el foco, además que se ejecuta cuando se abre la ventana.

Sinceramente es algo extraño esto. Será algún bug en la VCL? Veo muy díficil que el problema sea de Windows porque los eventos aquí involucrados datan de las primeras versiones de Windows y no creo que en tanto tiempo alguien no halla descubierto un problema como este.