Alguem Ajuda aqui Progama

[dyndell 0]

Olá Pessual :D Eu Queria Fazer Um Auto Tecla TIpo

A Cada 9 minutos Aperta " T " e Depois Escreve Alguma Coisa Tipo Oque eu Botar no Texto Edit

 

]

ALGUEM ME AJUDA A FAZER ?

[Ryokusei 28]

Pra digitar o "T" use: keybd_event(Ord('T'), 0, 0, 0);

[DragonBoss 9]

vamo laa, nao msei se eh isso ke tu ker, mas ve ae: primeiro adicione nas uses

ClipBrd

.. Coloke um timer com o tempo dos 9 minutos...( 540000 ) de dois clikes nele e digite isso:

 

keybd_event(Ord('T'), 0, 0, 0);

Clipboard.AsText :=edit1.Text ;

keybd_event(VK_CONTROL, 0, KEYEVENTF_EXTENDEDKEY or 0, 0);

keybd_event(86, 0, 0, 0);

keybd_event(VK_CONTROL, $45, KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP, 0);

keybd_event(VK_RETURN, 0, KEYEVENTF_EXTENDEDKEY or 0, 0);

 

ou seja, ele vai digitar a tecla T, copiar o ke ta no edit 1, e dar ctrl + V aonde tiveh aberto ( msn por exemplo) e vai da enter....

 

no botao de ativar poe

timer1.enabled:=true;

e no de desativar

timer1.enabled:=false;

 

flw, abraçs

 

OBS: eh um codigo de um flooder ke eu tinha no pc ;/

[dyndell 0]

ERRO Clipboard.AsText :=edit1.Text ;

:(

 

Clipboard.AsText :=edit1.Text ;

Deu erro nissu

[DragonBoss 9]

adiciocou ClipBrd nas uses ?

[dyndell 0]

Aff Esquece Meu Pai Sacaneou aqui Desinstalou o Delphi

Pow Cara Fiz Tudo Certo Programa Funcionando Mais Uma coisa que nao Funcionou Foii o Enter no Gta San Andreas Online SAMP tipo T Aperta o negocio de Escrever Mais na Hora que Vai Jogar Funciona mais nao aperta Enter e Mesmo assim nada :s mais to com o progama feito so falta aperta enter axo que vou instalar o Delphi antigo ele disse qe o 7 e pesado