Dimedrol1536
05.06.2011, 11:14
Есть в Cheat Engine инжектор, используется OpenDialog для выбора файла.
Можно ли переписать этот инжектор, что-бы инжектился определённый файл, без открытия диалога?
var dll: string;
functionname: string;
dllList: tstringlist;
begin
functionname:='';
dll:='';
if opendlldialog.Execute then
begin
dll:=opendlldialog.Filename;
if MessageDlg('Хотите ли вы посмотреть информацию по DLL?',mtConfirmation ,[mbyes,mbno],0)=mryes then
begin
dllList:=tstringlist.Create;
try
peinfo_getExportList(opendlldialog.filename, dllList);
with TfrmFunctionList.create(self,dllList) do
begin
if showmodal=mrok then
if itemindex<>-1 then
functionname:=functions[itemindex];
free;
end;
finally
dllList.free;
end;
end;
InjectDll(dll,functionname);
symhandler.reinitialize;
showmessage('DLL заинжектилось');
end;
Можно ли переписать этот инжектор, что-бы инжектился определённый файл, без открытия диалога?
var dll: string;
functionname: string;
dllList: tstringlist;
begin
functionname:='';
dll:='';
if opendlldialog.Execute then
begin
dll:=opendlldialog.Filename;
if MessageDlg('Хотите ли вы посмотреть информацию по DLL?',mtConfirmation ,[mbyes,mbno],0)=mryes then
begin
dllList:=tstringlist.Create;
try
peinfo_getExportList(opendlldialog.filename, dllList);
with TfrmFunctionList.create(self,dllList) do
begin
if showmodal=mrok then
if itemindex<>-1 then
functionname:=functions[itemindex];
free;
end;
finally
dllList.free;
end;
end;
InjectDll(dll,functionname);
symhandler.reinitialize;
showmessage('DLL заинжектилось');
end;