Evitar que um programa seja fechado?

30/08/2004

6

Olá,


Gostaria de sabe se tem jeito de evitar que um programa seja fechado mesmo que o usuário clique CTRL + ALT + DEL e vá em processos e finalize o processo?



desde já obrigado,


balceiro


Responder

Posts

Olá!!!

Utilize o link ´Pesquisar´e procure no fórum ´CTRL+ALT+DEL´ ou ´Travar teclas´.
Vc vai encontrar muita informação sobre o assunto


Sucesso


Maurício


Responder

31/08/2004

Balceiro

Mas acho inconveniente travar as teclas CTRL + ALT + DEL pois o musuário pode querer usar essas teclar para finalizar um outro processo e não o meu... Eu gostaria que quando ele tentasse finalizar o meu processo aparecesse a seguinte mensagem: ´o gerenciador de tarefas não pode fechar o processo´.


desde já muito obrigado,



balceiro


Responder

31/08/2004

Balceiro

vamos lá gente... me ajude... HELP.


Responder

31/08/2004

Macario

na propriedade OncloseQuery do form principal

sete a variavel CanClose para false.

Agora para não deixar que seu aplicativo seja fechado pelo C.A.D voce tem que ocultar ele

Procure por ocultar+processo.


Espero ter ajudado


Responder

31/08/2004

Nildo

Gostaria de sabe se tem jeito de evitar que um programa seja fechado mesmo que o usuário clique CTRL + ALT + DEL e vá em processos e finalize o processo?


Você se refere ao programa que você está fazendo ou a qualquer outro programa tipo o Notepad?


Responder

31/08/2004

Balceiro

me refiro ao programa que estou fazendo.


Responder

31/08/2004

Sandra

balceiro,

Dica retirada do DTDelphi 2.6:

[b:db02d2d288]079 - Escondendo o Programa de Ctrl+Alt+Del[/b:db02d2d288]
unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
 
type
  TForm1 = class(TForm)
  procedure FormCreate(Sender: TObject);
  procedure FormDestroy(Sender: TObject);
  private
  { Private declarations }
  public
  { Public declarations }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.DFM}
{Para ocultar um programa, deve-se registrar este como um serviço do Windows. Normalmente um serviço do Windows é ativado quando com a inicialização do sistema (Windows) e pemanece ativo até a finalização deste. Este processo esconde o programa da lista "Ctrl+Alt+Del"}
Const
  Servico_Simples = 1;
  Servico_Unregister = 1;
 
Function RegisterServiceProcess(DwProcessID, dwType: DWord): DWord; StdCall; External ´KERNEL32.dll´;
 
 
procedure TForm1.FormCreate(Sender: TObject);
begin
  RegisterServiceProcess(GetCurrentProcessID, Servico_Simples);
end;
 
procedure TForm1.FormDestroy(Sender: TObject);
begin
  RegisterServiceProcess(GetCurrentProcessID, Servico_Unregister);
end;

end. 


[b:db02d2d288]007 - Desabilitar Teclas Ctrl+Alt+Del[/b:db02d2d288] Ai vai um codigo que peguei no site da Borland que trava as teclas (Ctrl+Alt+Del), (Alt+Tab), (Ctrl+Esc)
var
  OldValue : LongBool;
begin
  {liga a trava}
  SystemParametersInfo(97, Word(True), @OldValue, 0);
  {desliga a trava}
  SystemParametersInfo(97, Word(False), @OldValue, 0);
end;



Responder

01/09/2004

Balceiro

Valeu pela dica, mas ela não funciona no windows xp.


Responder

01/09/2004

Sandra

Para XP?

Veja estes tópicos:
- [url=http://delphiforum.icft.com.br/forum/viewtopic.php?t=26628]Solução para Ctrl+Alt+Del e Winkeys no XP (Para todos)[/url]
- [url=http://delphiforum.icft.com.br/forum/viewtopic.php?t=23183]pegue aqui travas pra XP (Ctrl+Alt+Del;Alt+F4;Alt+Tab)[/url]
- [url=http://delphiforum.icft.com.br/forum/viewtopic.php?t=24226]desabilitando ctrl+alt+del[/url]
- [url=http://delphiforum.icft.com.br/forum/viewtopic.php?t=19543]Desabilitar CTRL+ALT+DEL, ALT+F4 WIN XP[/url]
- [url=http://delphiforum.icft.com.br/forum/viewtopic.php?t=17573]desativar a funçao ctrl + alt+ del e tecla windows no xp[/url]


Responder

01/09/2004

Balceiro

Gente...

Eu já pesquisei tudo sobre o bloquei de fechamento de um programa aqui no fórum e não encontrei nada a respeito.

Eu não quero desabilitar as teclar CTRL + ALT + DEL nem a tecla F4 na verdade eu quero somente que mesmo o usuário abrindo o gerenciador de tarefas do windows e localizando o meu processo na lista de processos ele não consiga finalizar o mesmo.


será que alguém pode me ajudar?


Responder

01/09/2004

Macario

Cara veja esses topicos

Esconder Aplicação
[url]http://delphiforum.icft.com.br/forum/viewtopic.php?t=15330&highlight=ocultar+processo[/url]

Fazer o programa não aparecer na lista de processos
[url]http://delphiforum.icft.com.br/forum/viewtopic.php?t=30711&highlight=ocultar+processo[/url]


já que o que voce quer é não permitir que o usuario feche seu
[b:4227cdda76]serviço/aplicação[/b:4227cdda76]


Responder

01/09/2004

Balceiro

O problema é que o no windows xp essa ocultação de processo não funciona.


eita coisa complicada.


Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira