Версия 2
Thread ID = Вземи процесна нишка identifier_ (Хипертекстова кутия за преглед 1. Take window handle (), process ID) hook handle = set system hook_ (7, & функция на кука, 0, ID на нишка)
.subroutine hook функция, тип цяло число .parameter hook код, тип цяло число .Параметър 1, тип цяло число .Параметър 2, тип цяло число .local variable focus handle, тип цяло число .local variable клас име, тип текст
Име на класа = Вземи празен текст (255) Focus handle = Get Focus Window_ () Вземете клас Name_ (Focus Handle, име на клас, 256) Ако е вярно (име на клас = "Internet Explorer_Server" и параметър едно = 517) Назад (1) Ако наистина свърши Return (извикай следващия hook_ (hook handle, hook code, аргумент едно, аргумент две))
|