Acción para Buscar

[[Caral]]

Hola

Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
   case key of

 vk_TAB    : Begin
            // lo que necesites hacer
            end;

 vk_RETURN  : Begin
            // lo que necesites hacer
            end;
end;

Saludos