1.void __fastcall TForm1::Timer1Timer(TObject *Sender) 2.{ 3. if(0.0055 <n && n< 0.008) 4. { 5. AreaSeries2->SeriesColor = clRed; 6. AreaSeries2->AddXY(n,Number); 7. } 8. else 9. { 10. AreaSeries1->SeriesColor = clLime; 11. AreaSeries1->AddXY(n,Number); 12. Number +=(float)1/10; 13. } 14. n = Now().CurrentTime().Val; 15.}
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)