Delphi null

Basit bir problem ama bazen takılıp kalabiliyorum.

Sorunum Edit içerisindeki değişken sorgulandığında gerçekleştiğinde editte hiçbir değişikli olmaması yani,

onkeypress olayına
if a<b then
begin
Key:=#0;
Beep;
end;

bunu yaptığımda hata verdi. Nerede yanlış yapıyorum?