Erro em Busca

Olá pessoal, sou nova aqui, me desculpe se estiver falando em lugar errado. Já pesquisei sobre isso mas nao achei, então, se puderem me ajudar...
Então, criei um cadastro simples e na hora de fazer a BUSCA, não dá certo. Sempre que coloco para buscar, fala que nada foi encontrado.
Os dados estão sendo cadastrados certinho, estão indo para o DB. Estou usando o Delphi XE e o IBExpert.
Estou usando um DataModule e nele tem: SQLConnection, SQLDataSet, DataSetProvider, ClientDataSet.
Segue o código:

begin
DataModule1.ClientDataset1.Active := False;
DataModule1.ClientDataset1.Params[0].AsString := Edit1.Text + '%';
DataModule1.ClientDataset1.Active := True;
BitBtnok.Enabled := not DataModule1.ClientDataset1.IsEmpty;

if DataModule1.ClientDataSet1.IsEmpty then
StsBr.SimpleText := Format ('Nenhum registro foi encontrado com ' + '"%s"', [Edit1.Text])
else
StsBr.SimpleText := Format ('%d registro encontrado com ' + '"%s"', [DataModule1.ClientDataSet1.RecordCount, Edit1.Text]);

end;

Desde já agradeço!