TForEachStep::SetExecFunction