Источник: delphiucoz
- Цель: научиться строить график в среде Delphi.
- Задача: сделать программу, которая строит заданный график.
- Пример: построить y=10*sin(x), аналог Excel диаграммы.
Решение:
Создать новую форму и поместить на нее компонент TСhart. Растянуть новый TСhart до удобного для разработки размера.
Способы настройки TСhart:
Редактируем и настраиваем внешний вид Series
- In Design-time (в процессе разработки)
- In Run-Time (в процессе выполнения кода)
Выбираем тип графика Line
Редактируем и настраиваем внешний вид Series
Пишем код нажатия на кнопку
procedure TForm1.BitBtn1Click(Sender: TObject);
var
i:integer;
begin
Series1.Clear;
for i:=0 to 22 do
begin
Series1.AddXY(i*0.29,10*sin(i*0.29),'',clGreen);
end;
end;
