Busqueda Incremental

[camiz]

Hola a todos, tengo un problemita y quiero que me ayuden a resolver, los explico.
estoy haciendo una aplicacion y quiero que tenga TEdit que sirva para buscar y filtrar solamente el registro deseado. el codigo es este:

procedure TfrmPrincipal.Edit1Change(Sender: TObject);
begin
ClienDataSet1.Encomiendas_vista2.Filter := 'Nombre Like ' + QuotedStr(Edit1.Text + '%');
ClienDataSet1.Encomiendas_vista2.Filtered := True;
end;

el codigo hace su trabajo a la perfeccion. solo con un problema para mi que tengo que ingresar los caracteres del nombre tal y como estan escritos en el registro, si entrevero mayusculas y minusculas no encuentra el registro.
y si le agrego ala primera linea este codigo

ClienDataSet.FilterOptions := [foCaseInsensitive];

ya no funciona, alguien me podria decir en que estoy fallando. gracias de antemano