Bueno, es que así no funcionan los filtros, no al menos los que puedes poner con el BDE. El que pones es válido para una consulta SQL.
En un filtro, el comodín no es % sino *, no puedes usar like y, creo que ni siquiera puedes usar más de un comodín. Así que se reduce a:
Código Delphi
[-]
dm.tcliente.filter:='codigo_principal = '+quotedstr(edit1.Text + '*');
o
Código Delphi
[-]
dm.tcliente.filter:='codigo_principal = '+quotedstr('*' + edit1.Text);
Y no olvides además poner la propiedad Filtered en
true.