procedure of object Threadsafe?

[alleinherrscher]

TFunctionParameters ist nur ein Record. Okay dann ist es keine procedure of Object. Wie nennt man es denn, wenn ich als Parameter eine Funktion übergebe?

Delphi-Quellcode:

       function Integrate(FunctionToIntegrate:TCommonFunction; Parameters:TFunctionParameters; From:double; Too:double;dx:double):double;
       var width,dummy:double;
           i,steps:cardinal;
           vz:integer;
       begin
          if (dx=0) or (Too=From) then
            begin
              result:=0;
              exit;
            end;
          width:=Too-From;
          dx:=abs(dx)*(Too-From)/abs(Too-From);
          if width/dx>high(steps) then
             begin
               output('Integration-Error: dx is set too small. Using smallest acceptable dx = '+floattostr(width/high(steps)));
               dx:=width/high(steps);
             end;
          steps:=round(width/dx);
          result:=0;

          for i := 1 to steps do
              result:=result+FunctionToIntegrate(From+(i-0.5)*dx, Parameters)*dx;
       end;