Фильтрация через Checkbox

[Don1231]

begin
if Form4.CheckBox1.Checked = false then datamodule5.ADOQuery3.Filtered := false
else
begin
datamodule5.ADOQuery3.Filtered := False;
datamodule5.ADOQuery3.Filtered := 'Status like %Заложенные%';
datamodule5.ADOQuery3.Filtered := true;
end;

Выдает ошибку [DCC Error] Unit4.pas(114): E2010 Incompatible types: 'Boolean' and 'string' в datamodule5.ADOQuery3.Filtered := 'Status like %Заложенные%';
не совпадение типов не могу понять где направьте в правильную сторону

[Аватар]

Filter <> Filtered