Тема: График
Показать сообщение отдельно
  #5  
Старый 26.03.2007, 19:25
Аватар для mav_c
mav_c mav_c вне форума
Активный
 
Регистрация: 26.03.2007
Адрес: Москва
Сообщения: 287
Репутация: 30
По умолчанию

Цитата:
Сообщение от Mc_DemON
Кстати, я до этого на паскале писал, может кто зает есть ли в делфи компонент какой-нибудь чтоб там можно было рисовать как в паскале при инициализации графического режима.
Вот типа такого:
Только добавь сначала хотя бы один график:
двойной клик на TChart и Add..
procedure TForm1.Button1Click(Sender: TObject); //процедура, где рисуеш график
var
i : integer;
x, y : double;
begin
x := -50;
y := 0;
for i := 0 to 1000 do //êîë-âî òî÷åê
begin
x := x + 0.01;
y := cos(x);
Chart1.Series[0].AddXY(x, y);
end;
end;
Ответить с цитированием