Мониторинг системы

← →
#Мастер# (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

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

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

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

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

Попдробнее!

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