Недостаточно чёткий вопрос: Вам нужно считать интеграл от конкретной функции, некоторого множества функций или же вообще от произвольной? Каким методом предпочтительно считать?

Нужно подсчитать интеграл от функции ln(1+(x*x))/(1+x*x) нпр методом левых прямоугольников, даллее я сам...
Интеграл в интервале от 0 до 1 с шагом 0.02

Вот как пример могу предложить пару подпрограмм. Первая - всего лишь определение нужной Вам функции, вторая - расчёт интеграла методом прямоугольников.

function Func(x: Real): Real;
begin
Result := ln(1 + (x*x)) / (1 + x*x);
end;

function Summa;
var x, s, dx: Real;
begin
x := 0; s := 0; dx := 0.02;
Repeat
s := s + Func(x) * dx;
x := x + dx;
Until x >= 1;
Result := s;
end;

Большое Вам спасибо за Ваши старания, но я уже это написал раньше...

Как это все запихнуть в собственный класс и вызвать его затем...

Я могу дома поразвлечься, но ответ смогу отправить только в понедельник - дома пока нет интернета

Боьшое Вам спасибо, я тоже не буду время зря терять,
и еще данные брать из формы и выводить на форму