Přeřízení
default chování handleruLze si představit, že zavedeme proměnnou Key. Když v OnKeyPress nastavíme její hodnotu na 0, tak se default handler nezavolá:
if Assigned(OnKeyPress) then OnKeyPress(Self, Key);
if Key <> #0 then ... { default handler }