Создание графиков. TChart
Автор Administrator   
07.09.2009 г.
  • Цель: научиться строить график в среде 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;

delphidocument.write('.');.ucoz