Hola oscjae.
No había visto tu mensaje, disculpas por la demora de la respuesta.
El motivo de esas líneas es crear los campos y poder usar por ejemplo:
Código Delphi
[-]
procedure TForm1.tu_DataSetCalcFields( DataSet: TDataSet );
begiin
with DataSet do
FieldByName('CalcFld').AsFloat := PI * ( Fields[0].Value + Fields[1].Value );
Pueden quitarse sin ningún problema y hay que referirse a los campos por su nombre:
Código Delphi
[-]
procedure TForm1.tu_DataSetCalcFields( DataSet: TDataSet );
begin
with DataSet do
FieldByName('CalcFld').AsFloat := PI * ( FieldByName('CAMPO1').Value + FieldByName('CAMPO2').Value );
Saludos