Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.04.15;
Скачать: CL | DM;

Вниз

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

 
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]

СПАСИБО



Страницы: 1 вся ветка

Текущий архив: 2002.04.15;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.007 c
14-46518
phantom2040
2002-03-06 15:10
2002.04.15
Округление в Delphi


1-46426
dimonf
2002-04-02 21:13
2002.04.15
Как сделать, чтобы QuickReport-а не было видно на моей форме?


3-46295
IronHawk
2002-03-21 10:58
2002.04.15
Иммитация нажатия клавиш DBNavigator !


1-46450
AFROLOV
2002-04-03 11:21
2002.04.15
Resize форм


3-46238
Lord Vader
2002-03-21 16:26
2002.04.15
TTable: автокалькуляция