Hola, también puedes ponerle un alias a cada Sum.
Código Delphi
[-]
With Modulo_Busqueda.Consulta_Estimulacion do
begin
................
SQL.Text:='SELECT SUM(Monto_Afect_Incump_Indicad) As Sum1, SUM(Monto_Result_calc) As Sum2 '+
'FROM Tbl_Estimulacion............';
Open;
showmessage(FieldByName('Sum1').AsString+' '+FieldByName('Sum2').AsString);
end;
Saluditos