No Encuentreo evento OnKeyPreess

[cloayza]

Bueno entonces esto...

Código Delphi [-]
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; var KeyChar: Char; Shift: TShiftState);
begin
     case (Key) of
        vkReturn: label1.Text:='Return';
        vkBack:   label1.Text:='Backspace';
        vkTab:    label1.Text:='Tab';
     else
         label1.Text:='KeyChar...'+KeyChar;
     end;
end;

Saludos cordiales