!!Problemas con IF y sus valores !!

[DarKraZY]

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
  // Siempre se quita el filtro
  ADOTable1.Filtered := False;

  // Hacer algo si hay texto
  if (Edit1.Text <> '') then
  begin
    // Crear el filtro
    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 + '*''';
    
    // Por último, activar el filtro
    ADOTable1.Filtered := True;
  end;
end;