Скачать: CL | DM;

Сканер памяти (типа ArtMoney)   Найти похожие ветки 

← →
Stanislav   (2007-10-14 13:42) [0]

Подскажите please, как можно осуществить сканер памяти (типа как в artMoney). Пробовал использовать многопоточность - вылетает ошибка, а при таком коде сканер работает, но очень очень медленно:

procedure Scan(min, max, nado:integer);
var
WindowName: integer;
ProcessId: integer;
ThreadId: integer;
HandleWindow: Integer;
write: cardinal;
buf: dword;
i:integer;
const
WindowTitle = "Program Manager";
NumberOfBytes = 4;
begin

For i:=min to max do begin
WindowName := FindWindow(nil,WindowTitle);
ThreadId := GetWindowThreadProcessId(WindowName,@ProcessId);
HandleWindow := OpenProcess(PROCESS_ALL_ACCESS,False,ProcessId);
ReadProcessMemory(HandleWindow, ptr(i), @buf, NumberOfBytes, write);
If buf=nado then begin
Form1.StringGrid1.RowCount:=Form1.StringGrid1.RowCount+1;
Form1.StringGrid1.Cells[0,Form1.StringGrid1.RowCount-1]:=inttostr(i);
end;
end;
end;

Этот кусок кода выводит в StringList адреса со значением переменной nado.

---

← →
Dib@zol ©   (2007-10-14 13:48) [1]

DLL-инжект?

---

← →
Denis__ ©   (2007-10-14 17:59) [2]

А artMoney законная программа?

---

← →
MetalFan ©   (2007-10-14 22:28) [3]

> Пробовал использовать многопоточность - вылетает ошибка,


> Form1.StringGrid1.RowCount:=Form1.StringGrid1.RowCount+1;
>
> Form1.StringGrid1.Cells[0,Form1.StringGrid1.RowCount-1]:
> =inttostr(i);

почитал бы про написание многопоточных приложений чтоли?!
например здесь
http://forum.vingrad.ru/forum/topic-60076.html

---

← →
antonn ©   (2007-10-14 23:32) [4]

> А artMoney законная программа?
>

нет, блин, подпольно-революционистическая, ей в webmoney буржуи деньги накручивают %)

---

← →
Stanislav ©   (2007-10-18 18:46) [5]

Спасибо MetalFan за полезную ссылочку

---

← →
MBo ©   (2007-10-19 05:26) [6]

>например здесь
>http://forum.vingrad.ru/forum/topic-60076.html

Лучше второисточник смотреть, так как в третьеисточнике внесены еще ошибки ;)
http://mbo88.narod.ru/ToC.html

Первоисточник:
http://www.eonclash.com/Tutorials/Multithreading/MartinHarvey1.1/ToC.html

---

← →
Stanislav ©   (2007-10-21 17:19) [7]

Thanks MBo.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.015 c