Criando um atualizado para grand chase

por **FullCheats** Sáb Mar 20, 2010 1:16 pm

Necessário
Basico conhecimento em delphi
txtDirectory ou Edit.txt
4 Buttons

No 1butao remomei ele para Atualizar e add os seguintes codes

Código:: begin WinExec(PChar(Edit1.Text + '\grandchase.exe __kogstudios_skip_patchtimecheck__'), 0); end;

No 2 butao remomei ele Alterar Diretório e add os seguintes codes

Código:: begin Edit1.enabled:=true; Button2.visible:=false; Button3.visible:=true; end;

Ou se for Edit.txt

Código:: begin Edit1.enabled:=true; Button2.visible:=false; Button3.visible:=true; end;

No 3 butao remomei ele para Salvar Diretório e add os seguintes
codes

Código:: begin ShowMessage('FullCheats Atualizador'+#13#10+'Diretório Salvo com Sucesso[url=http://www.webcheats.com.br/forum/#][/url]!'); Edi1.enabled:=false; Button3.visible:=false; Button2.visible:=true; end;

No 4 butao renomei ele para Abrir Grand chase e add os seguintes
codes

Código:: begin winexec(pchar('C:\Level Up! Games\Grand Chase Season 2\Grand Chase.exe'),sw_show); end;

Créditos
Surfistinha
Neto
FullCheats