Fazendo um Modificador de Scripts Avançado

[' Apple~* 9]

Surfistinha, eu fiz direitinho, porém na paste do ativar o novo script da erro no var!

[Surfistinha£ 20]

' Apple~* retire o begin em cima do var

[viniciusavs 0]

 

Vlw (:

[iur5 1]

Surf como eu faço para colocar aquele botão que tem em vários scripts desativar tudo com uma barrinah embaixo?

[Surfistinha£ 20]

adiciene mas

 

tipo

 

procedure TForm1.SpeedButton4Click(Sender: TObject);

var

DirFile,ScriptFile: String;

begin

if Edit1.Enabled=False then begin

DeleteFile(Edit1.Text+ScriptFile);

DirFile:=Edit1.Text+'\Stage\fight_stg.kom';

ScriptFile:='fight_stg.kom';

DirFile:=Edit1.Text+'\Stage\fight_stg.kom';

ScriptFile:='imas\fight_stg.kom';

if CopyFile(PChar(ScriptFile),PChar(DirFile),false) then

ShowMessage('Arquivo copiado com sucesso')

else

Application.MessageBox('O arquivo não foi copiado!'+#10#13+

'Verifique se as configurações estão corretas.','ERROR!',MB_IConerror);

end

else

begin

ShowMessage('Salve o diretório antes de ativar o script!!!');

end;

end;

[мя.νιηηy' 0]

Veioo sabe esses arquivos nem to achandoo

[Surfistinha£ 20]

Vc colocou os scripts na mesma pasta ?

[' Sky 6]

surf

me diz ae

pra eu por meu script pra ativar qual o codigo ?

e onde fik esses TButton ?

[Surfistinha£ 20]

aba standard primeira aba

 

Desativar

Button4.Enabled:=False;

Button5.Enabled:=False;

Button6.Enabled:=False;

Button7.Enabled:=False;

Button8.Enabled:=False;

Button9.Enabled:=False;

Button10.Enabled:=False;

Button11.Enabled:=False;

Button22.Enabled:=False;

Button18.Enabled:=False;

Button19.Enabled:=False;

Button20.Enabled:=False;

Button22.Enabled:=False;

Button21.Enabled:=False;

Button23.Enabled:=False;

Button24.Enabled:=False;

Button25.Enabled:=False;

Button26.Enabled:=False;

 

Ativar

Button4.Enabled:=True;

Button5.Enabled:=True;

Button6.Enabled:=True;

Button7.Enabled:=True;

Button8.Enabled:=True;

Button9.Enabled:=True;

Button10.Enabled:=True;

Button11.Enabled:=True;

Button22.Enabled:=True;

Button18.Enabled:=True;

Button19.Enabled:=True;

[' Sky 6]

mais tipo quero saber como faço

pra abrir o meu autokill

oque faço q nao entendi nada desse tudo .

como boto pra ativar

e o qual os comandos pra botar o meu auto kill

[Surfistinha£ 20]

var

DirFile,ScriptFile: String;

begin

if Edit1.Enabled=False then begin

DeleteFile(Edit1.Text+ScriptFile);

DirFile:=Edit1.Text+'\Stage\fight_stg.kom';

ScriptFile:='fight_stg.kom';

if CopyFile(PChar(ScriptFile),PChar(DirFile),false) then

ShowMessage('Arquivo copiado com sucesso')

else

Application.MessageBox('O arquivo não foi copiado!'+#10#13+

'Verifique se as configurações estão corretas.','ERROR!',MB_IConerror);

end

else

begin

ShowMessage('Salve o diretório antes de ativar o script!!!');

end;

end;

.

[Hitman. 8]

ow onde eu coloco o meu script?]

 

tipo dexa ele oculto na pasta?

 

ou como poe ele no programa

[DragonBoss 8]

hum, nao sei bem sobre esse assunto, mas axo ke vc tem ke por os scripts na pasta do seu programa ^^ (desculpa se falei bobera)dkopaksda

 

mas flw ae

 

abraços.

[lucas98 1]

cara o meu da erro tipo assim eu to querendo faser um de Darg Gunz(the duel) ai nos lugar que tem os baguio do gc eu colokodo os baguio dg mais da erro posta um topico do gunz ai por favor ???

[Surfistinha£ 20]

cara o meu da erro tipo assim eu to querendo faser um de Darg Gunz(the duel) ai nos lugar que tem os baguio do gc eu colokodo os baguio dg mais da erro posta um topico do gunz ai por favor ???

E a mesma coisa so mudar as coisas man =D

[Hitman. 8]

ow responde a minha pergunta acima pls

[Surfistinha£ 20]

Sim o script tem que vim numa pasta junto ao programa

[Hitman. 8]

pode me mandar souce? pq aki tudo q eu escrevo da erro

[Surfistinha£ 20]

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Nao Ripem baixem apenas para estudos

[Hitman. 8]

Por que não da pra salvar e nem executar?

[Surfistinha£ 20]

Por que não da pra salvar e nem executar?

 

Dar sim Ctrl + F9

[l2lipe 0]

pow cara eu fiz tudo certo mas na hora de compilar o aplication title da erro

e agora

[Surfistinha£ 20]

Declare nas uses shellapi

[xxlucasparreiraxx 0]

tem que baixar alguma coisa pra faze esse hack ??

[DragonBoss 8]

sim, o delphi Oo

nesse link tem uma versao mais leve do delphi, mas otima tbm :

 

http://www.webcheats.com.br/forum/delphi-vb/356080-download-delphi-7-s-e.html

 

flw,

abraços.