[Tutorial Delphi] Fazendo Removedor

[SNLM 0]

Olá Voltei... como o Geek tinha avisado sobre conteúdo Duplicado ... Desculpa,Mas só tentei ajuda ,pois dificilmente alguem vai na Quick List e sim Aquii mesmo ... Mais enfim .....:)

 

Vamos criar um removedor?

Primeiramente,inicie o Delphi.

 

Adicione quantos Buttons forem necessarios para o excluimento do arquivo.

 

 

No meu caso coloquei 2 Buttons

 

Um ''Remover Server Turkojan e Outro Remover Server Spy One ( TROJANS DA PESADA)

Ficando Assim !

Agora clique 2x no Button 1 (No meu Caso)

 

E Apague begin e adicione o seguinte comando

 

var

arquivo: string;

begin

// diretorio e nome do arquivo

arquivo := 'SEU DIRETÓRIO';

 

// vamos remover o arquivo

if DeleteFile(arquivo) then

ShowMessage('O arquivo foi excluído com sucesso')

else

ShowMessage('MENSAGEM SE NÃO OUVER ARQUIVO');

end;

 

end.

Agora clique no Button 2 (No Meu Caso)

 

Apague o begin e adicione o seguinte comando !

 

var

arquivo: string;

begin

// diretorio e nome do arquivo

arquivo := 'SEU DIRETÓRIOr';

 

// vamos remover o arquivo

if DeleteFile(arquivo) then

ShowMessage('O arquivo foi excluído com sucesso')

else

ShowMessage('MENSAGEM SE NÃO OUVER ARQUIVO');

end;

 

end.

Agora o Design fica ao seu critério. Se quiser por tema do XP é só ir na aba Win32 e XPManisfest e ja era !

Bom Pessoal Fico Por Aqui . Vlw!

 

 

Irei ficar Grato de Agradeçer ! Vlw !

[Mestre_Vator 0]

Impressão minha ou isto só deleta um arquivo com o DeleteFile()?

[SNLM 0]

Sim .. mais implementado !

[MRs.Romanha 9]

desculpe mas vc apenas uso o deletefile..

o nome do topico deveria ser [Deletar um arquivo mostrando uma mensagem]

simplesmente isso qualquer iniciante sabe fazer tornando seu tuto inutil

[+ DarkLord.! 0]

Remover Trojans assim é difícil, pois nem sempre eles serão deletados assim, só via força bruta.

Por Exemplo o turkojan, se ele for fechado ou algo do genero ele vai voltar.. mesmo assim vale a intenção (y)

[SNLM 0]

Olá pessoal.desculpe,eu só fiz um exemplo de exclusão de trojan.Pois sei que ele se hospeda nos REGEDIT do PC e assim seria mais um pokiin complicado de passa-lo aqui pra A WC

 

Maaiiis Vlw ae.Desculpe pelo erro do Delet File

 

Vlw !