TCalculateEvent
type TCalculateEvent = procedure(Sender:
TCustomTeeFunction; Const x: Double; Var y: Double) of object;
Unit
TeeFunci
Description
Event used by TCustomTeeFunction.
You should return your calculation result into Y parameter.
procedure TCustomFunctionDemo.TeeFunction1Calculate(Sender: TCustomTeeFunction;
const x: Double; var y: Double);
begin
y:= Sin(x/10);
end;