Busqueda de registro, error de String..

[[AgustinOrtu]]

Si sacas todo el codigo y dejas solo el open tambien da error?

EDITO:

Estas asignando en tu campo "Cod_Cliente" del cdsClien, el valor del campo "CLIENTE" del CDSclieCOD.

Código Delphi [-]
logicanegocio.cdsClien.Params.ParamByName('Cod_cliente').AsString := logicanegocio.CDSclieCODCLIENTE.Value;

Sustituilo por

Código Delphi [-]
logicanegocio.cdsClien.Params.ParamByName('Cod_cliente').Value := logicanegocio.CDSclieCODCod_Cliente.Value;

o bien

Código Delphi [-]
logicanegocio.cdsClien.Params.ParamByName('Cod_cliente').Value := logicanegocio.CDSclieCOD.FieldByName('Cod_Cliente').Value;

PD: Pasa algo con los Tag de codigo Delphi? Me salen caracteres en blanco en el post que no se ven en la edicion del texto