Yo lo he estado haciendo con código que hacia cuando recién empezaba en Delphi, en mi caso lo que hago es acortar o simplificar la sintax del código.
Ejemplo: en lugar de escribir
Código Delphi
[-]
Datamodule.FDQuery.SQL.Text: 'select * from clientes';
Datamodule.FDQuery.Open;
if true then
begin
showMessage('Prueba');
end;
Lo reemplazo por:
Código Delphi
[-]
Datamodule.FDQuery.Open('select * from clientes');
if true then
showMessage('Prueba');
Y también trato de no declarar variables a lo bruto