Hola,
Además de lo que te ha comentado ecfisa que también creo que pueda ser el error, debes intentar estructurar el código para tenerlo más claro.
Por ejemplo:
Código Delphi
[-]procedure TForm5.Edit1Change(Sender: TObject);
begin
ADOTable1.Filtered := False;
if (Edit1.Text <> '') then
begin
if CheckBox1.Checked then
ADOTable1.Filter := 'mitabla Like ''' + Edit1.Text + '*'''
else if CheckBox2.Checked then
ADOTable1.Filter := 'mitabla2 Like ''' + Edit1.Text + '*'''
else if CheckBox3.Checked then
ADOTable1.Filter := 'mitabla3 Like ''' + Edit1.Text + '*''';
ADOTable1.Filtered := True;
end;
end;