Uma coisa que eu gosto de fazer é refatorar código antigo. Sempre encontro muita coisa inútil que pode ser removida. Incontáveis vezes eu já escrevi código do tipo:

if not MeuDataSet.Active then
  MeuDataSet.Open;

O problema é que esse “if” é totalmente inútil. Se você olhar no código da classe TDataSet do Delphi vai ver que ele já faz essa checagem sempre que você chama Open. Outro código inútil que eu também já escrevi e continuo vendo muita gente repetir, é o seguinte:

if ClientDataSet.ChangeCount > 0 then
  ClientDataSet.ApplyUpdates(0);

Você também não precisa desse “if” pois a checagem também já é feita pelo ClientDataSet automaticamente.

Comece a olhar melhor para seu código e código de terceiros que você usa e certamente encontrará muita coisa que pode ser eliminada.