Fica lento quando na inserção pelo ClientDataset

Boa noite
Quando é feito inserção pelo ClientDataset fica um pouco lento, levando mais ou menos uns 2 a 3 segundos, quando é em média 10 registros.
Isso acontece quando é cadastrado contas a receber e o cliente fez em 10 parcelas por exemplo.

Segue abaixo a rotina

with CdsParcelasaReceber do
begin
Append;
FieldByname('CDITEM_PARCELASARECEBER').asInteger := Item;
FieldByname('VLPARCELA_PARCELASARECEBER').AsFloat := Vlr;
FieldByname('CDCONTA_CONTASARECEBER').asInteger := CdsContasaReceber.FieldByName('CDCONTA_CONTASARECEBER').AsInteger;
FieldByname('DT_VENC_PARCELASARECEBER').AsDateTime := TDataVenc;
FieldByname('SITUACAO_PARCELASARECEBER').AsString := 'A';
FieldByname('NRPARCELAS').asString := Inttostr(x);

Post;
end;

Estou trabalhando com Delphi 2010 + DBX + Firebird 2.10

Fico no aguardo

Rogério