cancelar
Showing results for 
Search instead for 
Do you mean 

(Bugs Fix) LoL Bugs Fix

(Bugs Fix) LoL Bugs Fix

olá,

Criei um simples aplicativo no delphi que resolve alguns bugs do lol..

sejam eles :

Cliente não quer abrir;

Problema ao Reconectar a Partida;

Client Bugado;

 

é simples mais resolve.

Link pra quem deseja baixa:

MediaFire:

https://www.mediafire.com/file/wbkync9xar3erhf/LoL+Bug+Fix.exe

ou

Mega:

https://mega.nz/#!9KRTkSDR!L9_3-tihNdqMWOWvgNXlPGUqGxiF-R04hKf7Dm32rSQ

 

testei apenas no meu Windows 10 pro 64Bits.

caso n resolva tente executa como administrador.

 

6 RESPOSTAS

Re: (Bugs Fix) LoL Bugs Fix

Poderia explicar o programa? Meio estranho...

Re: (Bugs Fix) LoL Bugs Fix

sim é apenas um "kill Task"

foi criado na plataforma pascal quem manja mandarei a Source code.

Re: (Bugs Fix) LoL Bugs Fix

Adoraria ver a source, posso?
Tropa

Re: (Bugs Fix) LoL Bugs Fix

Você sabe dizer se isso é seguro ?

Re: (Bugs Fix) LoL Bugs Fix

Ainda esperando a Source code, mesmo sendo uma possível solução, sem ofensas claro, é bom desconfiar.

Re: (Bugs Fix) LoL Bugs Fix

Rlx, eu entendo Smiley Happy,  eu ainda avisei e um simples kill task.

para saber se algo e seguro ou n gente é só purficar no olly.

 

source logo abaixo.

 

unit Unit1;

interface

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

type
TForm1 = class(TForm)
GroupBox1: TGroupBox;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Timer1: TTimer;
XPManifest1: TXPManifest;
Label6: TLabel;
procedure Timer1Timer(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

function KillTask(ExeFileName: string): Integer;
const
PROCESS_TERMINATE = $0001;
var
ContinueLoop: BOOL;
FSnapshotHandle: THandle;
FProcessEntry32: TProcessEntry32;
begin
Result := 0;
FSnapshotHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
FProcessEntry32.dwSize := SizeOf(FProcessEntry32);
ContinueLoop := Process32First(FSnapshotHandle, FProcessEntry32);
while Integer(ContinueLoop) <> 0 do
begin
if ((UpperCase(ExtractFileName(FProcessEntry32.szExeFile)) =
UpperCase(ExeFileName)) or (UpperCase(FProcessEntry32.szExeFile) =
UpperCase(ExeFileName))) then
Result := Integer(TerminateProcess(
OpenProcess(PROCESS_TERMINATE,
BOOL(0),
FProcessEntry32.th32ProcessID),
0));
ContinueLoop := Process32Next(FSnapshotHandle, FProcessEntry32);
end;
CloseHandle(FSnapshotHandle);
end;

{$R *.dfm}

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if GetAsyncKeyState(VK_F7)<>0 then
begin
KillTask('LeagueClientUx.exe');
KillTask('LeagueClientUxRender.exe');
end;

if GetAsyncKeyState(VK_F8)<>0 then
begin
KillTask('LeagueClientUx.exe');
KillTask('LeagueClientUxRender.exe');
KillTask('League of Legends.exe');
end;

if GetAsyncKeyState(VK_F9)<>0 then
begin
KillTask('LeagueClient.exe');
KillTask('LeagueClientUx.exe');
KillTask('LeagueClientUxRender.exe');
KillTask('League of Legends.exe');
end;


end;

end.