Error de Parametros IBX

[Chaja]

Hola Señores:
Bien, mi tema es el siguiente. Estoy pasando todo mi sistema del modelo de coneccion con BDE a IBX, lo cual es bastante trabajos.
Tengo alguas cosas que no me andan, cosas que si andaban con el BDE.
Por ejemplo tengo la sigte. Query


if BExacta.Checked Then
Modo:=' = '
Else
if BComienzaCon.Checked Then
Modo:=' Like '
else
if BIncluye.Checked Then
Modo:=' containing ';


CDSClientes.CommandText:='select c.codigo,c.nombre,c.razon_social,c.direccion_comercial, '+
'c.nro_de_cuit,c.nrodocumento,C.telefono_comercial_1,C.telefono_comercial_2,'+
'C.telefono_celular, c.limite_credito,c.sucursal,c.activo,c.localidad '+
'from clientes c '+
'where '+
'( c.activo in ( '+tipo+' )) and ' +
'( c.sucursal = :suc or :suc = -1 )and ' +
'c.'+NombreCampo[cbCampos.ItemIndex]+Modo+':dato '+
'order by c.'+NombreCampo[cbCampos.ItemIndex];

CDSClientes.Params.ParamByName('SUC').Clear;
CDSClientes.Params.ParamByName('DATO').Clear;


CDSClientes.Params.ParamByName('SUC').Value :=cbSucursal.KeyValue;
CDSClientes.Params.ParamByName('DATO').Value :=edDato.Text;

if BComienzaCon.Checked Then
if (NombreCampo[cbCampos.ItemIndex]='CODIGO') Then
CDSClientes.Params.ParamByName('DATO').Value:=''+copy(edDato.Text,1,8)+'%'
else
CDSClientes.Params.ParamByName('DATO').Value:=''+edDato.Text+'%';

CDSClientes.Open;


pero cuando se ejecuta sinmandar parametros nuevo la hace, si le mando de nuevo la cosnulta me tira este error

TDBXTypes.String value type cannot be accessed as TDBXTypes.String value type

no se por que pasa esto, tengo otra query que es casi igual, pero no me tira este error. Lo que me molesta es que con el bde todo funcionaba bien, y desde que empece pasar a IBX los problemas me persiguen. Era tan malo el BDE???

Bueno , buscque en embarcadero, con el mensaje de erro, pero no habia respuesta posible. Algun guru tendra una respuesta??

Gracias

Luis Roldan
Mar del Plata
Argentina

[Casimiro Notevi]

Amigo Chaja, con casi 100 mensajes que llevas y todavía no usas las etiquetas para formatear código ;) ???

Imagen extraida de la firma del compañero Neftalí :) -->
http://neftali.clubdelphi.com/images/UtilizarTAGs.png

[Chaja]

Perdon... nunca lo utilice por que no sabia para que era,,..... para la proxima ya se

Bye

Luis Roldan
Mar del Plata
Argentina

[Casimiro Notevi]

Tranquilo, nadie nace sabiendo :)