Buen dia a todos.
He leido todos los foros y no encuentro la solución a mi problema.
Tengo un Grid que tiene como suorce un TIBDataSet, ya tengo asignadas las propiedades SelectSQL, InsertSQL, DeleteSQL, etc.
El select lo hace perfecto pero cuando intento actualizar o agregar un registro si hago un post me marca error o simplemente no guarda nada.
Tengo un TDataSource1.DataSource=IBDataSet1
Tambien Tengo una forma de TDBEDIT con el dataSource igual al TDataSource1 (del TiBDataset). Al presionar un boton actualizar, el grid se oculta y los datos del registro al que apunta el grid se muestran en los TDBEDIT para editarse.
Por ejemplo, en ModifySQL lo tengo así:
Código:
update mitabla set Cargo= :Cargo,Fecha= :Fecha,
where Clave= :Clave
y, mi codigo para hacer un update lo tengo así:
Código:
IBDataSet1.Edit
//EditClave.Field.Value:=1;
EditCargo.Field.Value:='Vigilante';
EditFecha.Field.AsDateTime:=Now;
Quiero actualizar e insertar registros con los valores del los TDBEDIT pero no entiendo como hacerlo.
Ya los ligue con los parametros y no funciona, por ejemplo:
Código:
IBDataSet1.Append;
IBDataSet1.ParamByName('Cargo').AsInteger := EditCargo.Field.Value;
...
Ya intente de mil maneras y me marca "IBSQL Closed"
Puede alguien ayudarme con un ejemplo de como hacerlo o del porque me esta marcando ese error?
De antemano gracias.
Saludos