Ver Mensaje Individual
  #1  
Antiguo 25-08-2010
VictorVG VictorVG is offline
Registrado
 
Registrado: feb 2004
Ubicación: Sagunto-(Valencia)
Posts: 3
Reputación: 0
VictorVG Va por buen camino
Cool HKEY_LOCALMACHINE...Run arranca la app pero no funciona

Buenas,
Tengo un problemilla con una aplicación que funciona perfectamente si la ejecuta el usuario, pero que no funciona al iniciar en "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run" cuando arranca el PC.
El caso es que aparece en el "Administrador de tareas", pero no realiza ningún trabajo. La aplicación no tiene ningún form o ventana asociada, pero como digo funciona perfectamente si la ejecuta el usuario.
He probado con esta pequeña aplicación y tampoco funciona (solo funciona si la ejecuta el usuario):

Código Delphi [-]
program Test;
uses Windows, SysUtils;
{$R *.RES}
var
  aux: integer;
  hf: THandle;
  t: string;
  written: Cardinal;
begin
  hf := CreateFile('TestLog.txt', GENERIC_WRITE, 0, nil, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0);
  try
    //Para que se pueda ver durante 1 minuto en el administrador de tareas
    for aux := 1 to 60 do begin
      Sleep(1000); 
      t := DateTimeToStr(Now) + #13#10;
      WriteFile(hf, t[1], Length(t), written, nil);
    end;
  finally
    CloseHandle(hf);
  end;
end.

Si compilais y lo poneis en el registro para que inicie, podreís comprobar, que arranca, está 1 minuto en el "Administrador de tareas" y no escribe nada en archivo.
Pero sin embargo funciona perfectamente cuando es el usuario quien la ejecuta.
Otra cosa, si la sustituyo por una app con Form si que me funciona. Ah! También he probado mover la clave a HKCU y nada.

¿Se le ocurre a alguien que puede estar pasando??

Un saludo y gracias anticipadas.
VictorVG

Última edición por VictorVG fecha: 25-08-2010 a las 04:59:43.
Responder Con Cita