Source position: taintervalsources.pas line 110
type TDateTimeStepChangeEvent = procedure(
Sender: TObject;
ASteps: TDateTimeStep
) of object;