Если я не ошибаюсь, это то, что вы хотите
Series1.AddXY(<Pass the data value>, <Pass Your value>, '', clRed);
Series1.AddXY(now, 1, '', clRed);
Series1.AddXY(now + ( 1 /(24*60*60)), 2, '', clRed); //After 1 seconds
Series1.AddXY(now + ( 2 /(24*60*60)), 3, '', clRed); //After 2 seconds