Добрый день хотелось бы попросить о помощи

← →
Maxim Homutov (2002-04-04 14:09) [0]

Хотелось бы узнать естьли у кого нибудь исходник рисующий график последовательного треугольного импульса

← →
MBo (2002-04-04 14:51) [1]

Поясни. Вроде осциллографа? TChart не подойдет?

← →
Maxim Homutov (2002-04-04 14:55) [2]

Да вроде него радимого и TChat пойдет

← →
MBo (2002-04-04 15:02) [3]

В чем конкретно проблемы?

← →
Maxim Homutov (2002-04-04 15:14) [4]

Мне нужно сделать программу которая показывала осцеллограму нескольких периодических видео сигналов.

← →
MBo (2002-04-04 15:22) [5]

надо говорить конкретнее - что именно не умеешь

по таймеру добавляешь в Series1 Chart-а очередное значение.
Чтобы выглядело как осциллограф, при достижении определенного Series1.Count уничтожаешь первую точку.

← →
Maxim Homutov (2002-04-04 15:27) [6]

конкретней не получается описать эти сигналы

← →
MBo (2002-04-04 15:36) [7]

например, каждый раз меняешь нелокальную переменную
Aboolean:=not Aboolean;
if Aboolean then Y:=1 else Y:=-1;
и добавляешь Series1.AddXY(X {время или номер}, Y);

← →
Maxim Homutov (2002-04-04 16:04) [8]

Я извеняюсь за наглость ну хотелось бы узнань нет у вас готового исходника

← →
MBo (2002-04-04 16:16) [9]

примерно так
var Form1:TForm1;
Aboolean:Boolean;
Cnt:integer;

procedure TForm1.Timer1Timer(Sender:TObject);
begin
Aboolean:=not Aboolean;
Inc(CNt);
if Aboolean then Y:=1 else Y:=-1;
Series1.AddXY(Cnt,Y);
While Series1.Count>100 do
Series1.Delete(0);
end;

← →
Maxim Homutov (2002-04-04 16:35) [10]

Спасибо за помощь ну это нето что мне нужно
мне хотелось бы по реальний

← →
MBo (2002-04-04 16:56) [11]

поищи Varian Software Workshop там есть Scope

← →
Maxim Homutov (2002-04-04 17:01) [12]

СПАСИБО

Добрый день хотелось бы попросить о помощи Найти похожие ветки