Форум: "WinAPI";
Текущий архив: 2004.11.28;
Скачать: [xml.tar.bz2];

Вниз

Мониторинг системы   Найти похожие ветки 

← →
#Мастер#   (2004-10-09 18:43) [0]

Создаю программу, которая последовательно записывает в файл все действия пользователя(работа с мышью, с клавиатурой, запуск программ, системные команды, работа с интернет, работа с файлами и реестром и т.д.),т.е. всё, что пользователь делает всё фиксируется в специальном файле, а также делает скриншоты запущенных программ. Затем в этой программе можно будет в графическом виде просмотреть, "глазами пользователя" все его действия в определённый момент времени. Как можно осуществить этот мониторинг. И ещё, как можно эмулировать рабочий стол в Image, т.е. как соотнести координаты мыши, записанные в файл относительно всего экрана в поле Image. Заранее спасибо!

---

← →
kaZaNoVa ©   (2004-10-09 18:59) [1]

ок, keylog spy форева !!!!
а по сабжу - это троян 100%  ;)))))))))

посмотри, как это реализовано в Handy Keylogger -  я как-то его юзал ...

---

← →
kaZaNoVa ©   (2004-10-09 19:04) [2]

скриншот (с возможностями уменьшения)
program Project1;

uses
Windows,Kol;

Const p=1;
Var
bmp,bmp2: PBitmap;
FileName:string;

r1,r2:trect;
{$R *.res}

function ScreenWidth:Integer;
begin
 Result := GetSystemMetrics(SM_CXSCREEN);
end;
function ScreenHeight:Integer;
begin
 Result := GetSystemMetrics(SM_CYSCREEN);
end;

begin
if ParamCount<>1 then
begin
FileName:=Paramstr(0);
delete(FileName,Length(FileName)-3,4);
FileName:=FileName+".bmp"
end else
FileName:=Paramstr(1);
bmp:=NewBitmap(0,0);
bmp2:=NewBitmap(0,0);
bmp.Height := ScreenHeight;
bmp.Width  := ScreenWidth;

bmp2.Height := ScreenHeight div p;
bmp2.Width  := ScreenWidth div p;

BitBlt(bmp.Canvas.Handle, 0, 0, ScreenWidth, ScreenHeight, GetDC(GetDesktopWindow), 0, 0, SRCCopy);
//bmp.SaveToFile(FileName);

r1.Left:=0; r2.Left:=0;
r1.Top:=0;  r2.Top:=0;

r1.Right:=ScreenWidth;
r1.Bottom:=ScreenHeight;

r2.Right:=ScreenWidth div p;
r2.Bottom:=ScreenHeight div p;

bmp2.CopyRect(r2,bmp,r1);
bmp2.SaveToFile(FileName);

bmp.Free;    bmp2.Free;
end.


---

← →
#Мастер#   (2004-10-12 18:17) [3]

Спасибо,kaZaNoVa!!! Но можно более подробно... keylog spy - это программа с исходниками или как?

---

← →
kaZaNoVa ©   (2004-10-12 18:39) [4]

#Мастер#   (12.10.04 18:17) [3]
keylog spy это клавиатурный шпион - сам пишешь ..  или готовый ищешь ...

---

← →
#Мастер#   (2004-10-13 21:15) [5]

kaZaNoVa, Скинь ссылочку пожалуйста на keylogspy

---

← →
XProger ©   (2004-10-13 22:47) [6]

Вешай Hook на мышь и клаву. На форме есть топики на эту тему.

---

← →
#Мастер#   (2004-10-14 16:27) [7]

Спасибо всем!!!

---

← →
#Мастер#   (2004-10-17 18:28) [8]

Попдробнее!

---

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

Форум: "WinAPI";
Текущий архив: 2004.11.28;
Скачать: [xml.tar.bz2];

Наверх

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