Ayuda con un Stored Procedure en MySQL

[[enecumene]]

Hola amigos, estoy haciendo el siguiente procedimiento:

Código SQL [-]
CREATE PROCEDURE `SP_Buscaped`(Filtro varchar(20),Ano INT(4),Texto Varchar(50))
BEGIN
    
  /*****************************************************************************/
  /* OPERACION QUE REALIZA LA BUSQUEDA DE ACUERDO AL FILTRO                    */
  /*****************************************************************************/
  if Filtro = 'Pedido' THEN
  
  SELECT * FROM reg_pedidos WHERE no_ped Like :Texto And fecha_rec_ped >= CONCAT(:Ano,'-01','-01') And fecha_rec_ped<= CONCAT(:Ano,'-12','-31');
  
  END IF;         
END;

La cuestión es ¿como le doy valores a los parametros de entrada desde Delphi?, lo estoy llamando desde un TQuery:

Código SQL [-]
call SP_buscaped(Filtro,Ano,Texto);

Pero no me regresa nada,

Saludos.