Unit Keysnoo_

Classes

TForm1 -

Functions

Types

tActivateKeySnooper

Constants

Variables

Form1


Functions


Types


tActivateKeySnooper = procedure(CurrentTask : thandle; messageno : word)

Constants


Variables

Form1 : TForm1