Не найден параметр при выполении запроса

[Dozent]

Всем привет, подскажите в чём проблема?

procedure TForm1.Button13Click(Sender: TObject);
begin
  with SMSF do
    begin
      ParamByName('mail').Value:='';
      SQL.Text:='Select * from CLIENTS where EMAIL like :mail';
    Open;
    end;
end;

Параметр создан с таким именем тип ftString, ptInput, string

Но почемуто выдаёт ошибку что параметр mail не найден

[Аватар]

А значение параметру кто будет присваивать? Parameters.ParamByName('mail').Valu e:= но только после присвоениz в SQL.Text

[Dozent]

Блин спасибо огромное час уже сижу понять не могу в чём проблема.......

[Dozent]

Если не сложно помогите выдти из ещё одного затруднения

  with SMSF do
    begin
      SQL.Text:='Select * from CLIENTS where (EMAIL like :mail) AND (D_ROZH = :d_rozh)';
      If CheckBox1.Checked then ParamByName('mail').AsString:='';
      If CheckBox6.Checked then ParamByName('d_rozh').AsDate:=Date1.Date;
      Open;
    end;

Всё работает, но мне надо чтобы если чекбокс.чекед в фалсе то параметр не учитвался в запросе... Подскажите как реализовать...