Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Для новичков > Tchart не получается плиз.


Автор: Levison 27.5.2008, 16:28
Код

const  
  Lambda=11;   
  T=0.08;   
  N=1000000;   
...   
...   
...         
  Qanalit:=1/(1+T*Lambda);   
        c:=1/Lambda;   
        Randomize;   
...   
...   
for a:=1 to N do  
   begin  
     x:=round(log10(a));// формула которые будут около линии десятичного логарифма   
     y:=round(q[a]);// 1 миллион точек   
   end;   
  
for i:=0 to 6 do  
begin  
  Series2.AddXY(i,Qanalit,'',clblack); // линия которая чертится горизонтально   
end;   
  
мне надо чтоб вокруг этой линии были точки как десятичный логарифм.   
так как делений по оси Х 6, а N=1 000 000. Значит по Х будет 6 делений а по У от 0 до 1  

Я не могу забить эти формулы в график чтоб они работали:
for a:=1 to N do  
   begin  
     x:=round(log10(a));// формула которые будут около линии десятичного логарифма   
     y:=round(q[a]);// 1 миллион точек   
   end;   

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)