Hola, si en vez de:
Código Delphi
[-]IBDataset.params[0].asString:=edit1.text;
usas esto:
Código Delphi
[-]IBDataset.ParamByName('cod').asString:=edit1.text;
También te da el error?
Ese campo en el IBDataSet lo tienes definido como un TIBStringField?