index c3b4b23e0ee43fbacdec4756a62f4bdd782c4dcd..4e4f42377e3da2e59abb09b1967ce97add6ad01f 100644 (file)
procedure sys_Init;
procedure sys_Final;
+ var (* hooks *)
+ sys_CharPress: procedure (ch: AnsiChar) = nil;
+
implementation
uses SysUtils;