有没有哪位好心人给个波形显示的源码啊？

[hanqiu0302]

要做一个脑电图分析的小系统（导师逼的），可是我是刚刚才开始学Delphi的，语法都还没太搞懂。前一段时间好不容易把数据库连上了，文件管理可以了。可是这波形就说啥也显示不出来，更别说分析了。
用来显示波形的数据文件是老师给了的，据说里面是一些4位二进制数，也就是一个个点（16个通道的）。
有没有哪位前辈做过波形显示的，帮帮忙好吧？以前似乎听说过很多做心电图的，显示应该差不多吧？先谢谢啦！

[shuihan20e]

可以使用TCHART或DBCHART
也可以自己用canvas画到FORM上

[skylkj]

additional选项卡里有Tchar控件,可以用来画线图

[hanqiu0302]

Tchart画出来的似乎立体感太强了吧？画平面图就好，就是想用canvas画到FORM上的，只是具体过程不太明白，怎么把一个个点读进来。能不能说得再清楚一点？最好有代码，哪怕就一个点的也行啊！谢谢啦！

[skylkj]

Tchart画由方便效果又好

据的立体感强,在添加series时选择line,同时把下面那个"3d"的勾去掉

[hongchao]

用TCHART控件最方便，仔细试一下控件的设置，使用ADDXY()可以添加点，很方便

[mdejtod]

直接在画布上画...嘿嘿

[hanqiu0302]

我现在最大的问题是不知道怎么把点读出来~
能不能说具体点儿？ADDXY()要怎么个用法，怎么把点读进去？先设一个指针吗？然后呢？给一小小段程序就行。

[scarsty]

x, y: array of integer;

......

filehandle:=fileopen('datafileName', fmopenread);
len:=fileseek(filehandle, 0, 2);
setlength(x, len div 4 + 1);
setlength(y, len div 4 + 1);

x自己看着办

fileseek(filehandle, 0, 0);
fileread(filehandle, y[0], len);

for i := 0 to len div 4 do
  image.canvas.pixels[x[i], y[i]] := clred;

pixels名字不确定是这个，看代码提示