Fórum Evitar deleção de diretório e arquivos #259156
19/11/2004
0
quero evitar que espiritos de porcos, vao no c:\meuprograma e delete tudo!!!!
Como eu faço??
O4pr3ndiz
Curtir tópico
+ 0Posts
19/11/2004
Inutaishou
E o cliente também não vai gostar muito da idéia do Spy...
[]´s,
Gostei + 0
19/11/2004
O4pr3ndiz
alguem pode me ajudar efetivamente???????
Gostei + 0
19/11/2004
Reginaldo174
procedure TForm1.Timer1Timer(Sender: TObject);
begin
PostMessage(FindWindow(nil, ´Sua pasta - Microsoft Internet Explorer´), WM_CLOSE,0,0);
end;
terá que mudar o nome conforme o sistema operacional (98,2000,xp). Este exemplo bloqueia no win2000
Gostei + 0
24/11/2004
O4pr3ndiz
apagar diretorio
procedure TForm1.Timer1Timer(Sender: TObject);
begin
PostMessage(FindWindow(nil, ´Sua pasta - Microsoft Internet Explorer´), WM_CLOSE,0,0);
end;
terá que mudar o nome conforme o sistema operacional (98,2000,xp).
Este exemplo naum funciona, alguem pode me ajudar???
Gostei + 0
24/11/2004
Reginaldo174
Garanto a vc que funciona. Me mande um e-mail informando qual o sistema operacional que vc utiliza que te mando um exemplo com executável funcionando.
Gostei + 0
24/11/2004
O4pr3ndiz
Obrigado...
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)