if Assigned(PointData.Event) then
     begin
       dtNull(Data);                                  // у меня вот эта 828-я
       OnData(PointData,dt);
       if dt.data_type <> data_break then  //!!! data_break-feature
        begin
         if dt.data_type = data_stream then
           Result := PStream(dt.idata)
         else Result := nil;
         exit;
        end;
     end;