Jump to content

Turbine o seu Perfil

Confira a atualização e participe do clube!
Clique e saiba mais

Junte-se ao Clube de Membros VIP

Tenha destaque e diversos benefícios!
Confira Aqui

Acesse nosso Discord

Conheça nossos canais interativos
Confira Aqui
Notícia
  • Adquira já o seu VIP!
*~Kiidu

[Ajuda]Atualizador de GC

Recommended Posts

Eu to criando um atualizador de gc eu coloquei fiz tudo apertei salve project as abri o project mais na hora q eu vo Compilar (F9) da o seguinte erro :

errodelphi.jpg

 

Olha o code do atualizador :

 

unit Unit1;

interface

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs, StdCtrls, jpeg, ExtCtrls;

type
 TForm1 = class(TForm)
   Edit1: TEdit;
   Image1: TImage;
   GroupBox1: TGroupBox;
   Button1: TButton;
   Button3: TButton;
   Button4: TButton;
   Edit2: TEdit;
   Button2: TButton;
   procedure Button2Click(Sender: TObject);
   procedure Button3Click(Sender: TObject);
   procedure Button4Click(Sender: TObject);
   procedure Button1Click(Sender: TObject);
 private
   { Private declarations }
 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button2Click(Sender: TObject);
Begin
Edit1.enabled:=true;
Button2.visible:=false;
Button3.visible:=true;
end;

procedure TForm1.Button3Click(Sender: TObject);
Begin
ShowMessage('Diretório Salvo com Sucesso!');
Edit1.enabled:=false;
Button3.visible:=false;
Button2.visible:=true;
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
winexec(pchar('C:\Level Up! Games\Grand Chase Season 3\Grand Chase.exe'),nil,nil,sw_show);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
WinExec(PChar(Edit1.Text + '\grandchase.exe __kogstudios_skip_patchtimecheck__'),nil,nil,sw_shownormal);
end;

end.

 

Tem alguma coisa errada ? Poderia me mandar o code certo ??

Por favor me ajudem.

Share this post


Link to post
Share on other sites

Amigo esse método está patched ate ememso resolvendo esse erro vai dar ouro erro já no executável do GC agora é via SendKeys!

Closed!

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.

×
×
  • Create New...