133
end;
end;
В прежнем варианте мы 4 раза делали одно и то же: вычисляли и добавляли точку в
график. А в
новом варианте используем цикл, т.е. многократно повторяющуюся группу
действий. Нельзя сказать, что мы «ходим по кругу», т.к.
при каждом новом повторении
изменяется значение переменной цикла i и, следовательно,
значение переменной x,
которая последовательно принимает значения 1, 2, 3, 4. Таким образом, новый код при
исполнении даёт тот же результат, что и прежний, но
при этом является более
эффективным. Например, мы легко можем изменить количество проходов цикла и,
следовательно, количество точек на графике:
было
стало
for i:= 1
to 4
do
for i:= 0
to 4
do
Скомпилируем и запустим проект на исполнение. Результат показан на рис. 5.9. Мы
видим, что точек на графике стало больше за счет увеличения количества проходов в цикле.
В первоначальном варианте кода нам пришлось бы добавлять
дополнительные строки
кода. А в новом – достаточно изменить пару числовых констант.
было: 4 точки
стало: 5 точек
Рис. 5.10. Увеличение числа точек на графике
Чтобы на графике появились красивые квадратики, обозначающие вычисленные
точки, нужно в design-time дважды щёлкнуть на TChart, выбрать
узел Series, кликнуть на
единственной линии графика Series1, перейти на закладку Forman->Pointer и установите
«галочку» Visible (рис. 5.11).
134
Рис. 5.11. Настройка отображения точек графика
Перейдём к следующему реализации добавления точки к
графику без изменения
программного кода. Чтобы построить график функции на произвольном интервале с
заданным количеством точек, нужно выполнить ряд шагов:
• задать количество точек на графике;
• определить начальную и конечную точки диапазона;
• рассчитать координаты каждой точки;
• добавить координаты каждой точки в линию графика.
На рис. 5.12
показано, как мы будем вычислять координаты, зная начальную и
конечную точки, а также их количество на графике.
Do'stlaringiz bilan baham: 
