摘要: procedure TFormMain.Timer1Timer(Sender: TObject);begin inherited; iPlot1.Channel[0].TitleText:='白石监测点'; iPlot1.Channel[1].TitleText:='芳村监测点'; iPlot1.Channel[0].AddYElapsedSeconds(Random(30)); iPlot1.Channel[1].AddYElapsedSeconds(Random(30));end;procedure TFormMain.FormShow(Sender: TO 阅读全文
posted @ 2008-11-04 15:00 delphi中间件 阅读(1041) 评论(0) 推荐(0) 编辑