Yo tuve un problema similar, use
eurekalog para revisar el codigo y vi que el error me lo daba en una llmada a un componente del form en el cual ponia el nombre del form delante.
Podrias probar si anulando lo que he subrayado te funciona.
Código Delphi
[-]
if fmFormularioUno.cActividad.State = dsInsert then
begin Self.Caption := 'Nueva Actividad';
cbTipo.ItemIndex := 0;
fmFormularioUno.cActividad.FieldByName('codactividad').Value := 0;
end;
Saludos
Josep