Versiunea 2
ID fir = Ia firul de proces identifier_ (Hipertext navighează caseta 1. Ia handle-ul ferestrei (), ID proces) Mâner Cârlig = Set Sistem hook_ (7, & funcție Cârlig, 0, ID Fir)
.funcția hook de subrutină, tip întreg .parameter cod hook, tip întreg .Parametru Parametru 1, tip întreg .Parametru Parametru 2, tip întreg .mâner de focalizare variabilă locală, tip întreg .local variabilă nume clasă, tip text
Numele clasei = Ia text gol (255) Focus Handle = Get Focus Window_ () Obține Clasa Name_ (Focus Handle, Numele Clasei, 256) Dacă este adevărat (numele clasei = "Internet Explorer_Server" și parametrul unu = 517) Spate (1) Dacă chiar se termină Return (call next hook_ (hook handle, hook code, argument unu, argument doi))
|