Club Delphi  
    Paypal   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 26-03-2004
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Si pones Application.Title = '' el programa no aparecerá en la lista de aplicaciones del administrador de tareas. Sin embargo sí aparecerá en la lista de procesos. Quitarla de ahí en 2000/XP es, hasta donde he visto, mucho más difícil sino imposible y altamente sospechoso.

// Saludos
Responder Con Cita
  #2  
Antiguo 26-03-2004
Avatar de acertij022
acertij022 acertij022 is offline
Miembro
 
Registrado: may 2003
Ubicación: Argentina-Bs. As.
Posts: 233
Poder: 24
acertij022 Va por buen camino
Cita:
Empezado por roman
Sin embargo sí aparecerá en la lista de procesos. Quitarla de ahí en 2000/XP es, hasta donde he visto, mucho más difícil sino imposible y altamente sospechoso.
La verdad que seria bueno que no aparezca alli para que no me borren el archivo ya que este aplicativo iria en un cyber , en el cliente y debo evitar que cierren o borren mi aplicativo. porque se me quejan que arranca con un diskette y borran el aplicativo del cyber en cambio si no save en donde esta corriendo no podran


Estoy abierto a sugerencia...
Responder Con Cita
  #3  
Antiguo 26-03-2004
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Cita:
Empezado por acertij022
Estoy abierto a sugerencia
Usa políticas de grupo:

Colocando la clave

DisableTaskMgr = 1 (DWord)

en

HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System

del registro de Windows impides que los usuarios puedan abrir el administrador de tareas.

// Saludos
Responder Con Cita
  #4  
Antiguo 26-03-2004
Avatar de DarkByte
DarkByte DarkByte is offline
Miembro
 
Registrado: sep 2003
Ubicación: Desconocido
Posts: 1.322
Poder: 25
DarkByte Va por buen camino
o pon como nombre de ejecutable explorer.exe o lsass.exe ... nombres comunes de windows....
__________________
:)
Responder Con Cita
  #5  
Antiguo 26-03-2004
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Cita:
Empezado por DarkByte
o pon como nombre de ejecutable explorer.exe o lsass.exe ... nombres comunes de windows....
o bien, "SiMeBorrasTeDemando.exe".



// Saludos
Responder Con Cita
  #6  
Antiguo 29-03-2004
Avatar de acertij022
acertij022 acertij022 is offline
Miembro
 
Registrado: may 2003
Ubicación: Argentina-Bs. As.
Posts: 233
Poder: 24
acertij022 Va por buen camino
tomare la idea de DarkByte .

gracias a todos si alguien se le ocurre otra posibilidad para que no aparezca en el administrador de tarea por favor apuntelo en el hilo.
Responder Con Cita
  #7  
Antiguo 10-04-2004
verm83 verm83 is offline
Miembro
 
Registrado: nov 2003
Posts: 28
Poder: 0
verm83 Va por buen camino
Sí que hay solución, y es la siguiente:
Antes de nada, añade registry en el uses de tu form, y luego, suponiendo que tienes un botón Button1, su evento clic sería este:


Código:
procedure TForm1.Button1Click(Sender: TObject);
 
  procedure DisableTaskMgr(bTF: Boolean);
  var  
    reg: TRegistry;
  begin 
    reg := TRegistry.Create;
    reg.RootKey := HKEY_CURRENT_USER;
 
    reg.OpenKey('Software', True);
    reg.OpenKey('Microsoft', True);
    reg.OpenKey('Windows', True);
    reg.OpenKey('CurrentVersion', True);
    reg.OpenKey('Policies', True);
    reg.OpenKey('System', True);
 
    if bTF = True then 
    begin 
      reg.WriteString('DisableTaskMgr', '1');
    end 
    else if  bTF = False then 
    begin  
      reg.DeleteValue('DisableTaskMgr');
    end;  
    reg.CloseKey;
  end; 
 
begin  
  //Desabilitamos el Ctrl-Alt-Del (Con False vuelve a estar habilitado)
  DisableTaskMgr (True);
end;
El código lo insertas ya donde te venga mejor Esta solución está sacada de la web we Q3, y yo lo usé hace tiempo. Espero que te sirva si aún sigues interesado.
__________________
IncestoCanibal.com
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


La franja horaria es GMT +2. Ahora son las 01:51:11.


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