[Romix]

Здраствуйте... Сразу честно скажу, делаю кейлоггер...И вот проблема...Мне нужно что бы клавиши записывались в строку если например все пишеться в NOTEPAD1... И если было переключенно на например NOTEPAD2... То создавалась отдельная строка для NOTEPAD2... Вот пример...

Код:

procedure TMainForm.WM_READHOOK(var Message: TMessage);
var
S: String;
begin
if (открыто какое нить окно) then
begin
S:=S + GetCharFromVKey(Message.WParam)
end
else
(открылось другое окно)
То все записываеться в файл что было в переменной S;
end;

Я не очень понятно обьяснил но все же... Заранее спасибо!...

[0nni]

GetForegroundWindow() возвращает хендл окна активного придожения, по нему сможешь определить его заголовок.