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: TObject);
begin
inherited;
iPlot1.XAxis[0].Span := 10;
iPlot1.YAxis[0].Span:=30;
iPlot1.XAxis[0].Title := '时间(秒)';
iPlot1.YAxis[0].Title:='水位(米)';
end;