我想写一个象windows任务管理器中的性能中的可以动的图形.但是写出来的不能向前移动.所以向各位高手求相关代码.多谢了.
解决方案 »
- 怎样在在Tlistview控件内容修改后,用户忘记执行保存操作而关闭窗体时,提示用户是否进行保存?
- 西安有没有招兼职程序员(delphi)的? 来者有分!
- 弱智问题~type
- 在ODBC里,请问用什么驱动导出*.DB文件到数据源里去?为什么我导的时候是灰化的?急~急急急急急~~~~~~~~~~~
- sql引用变量
- 网络机器登陆问题
- 使用delphi7 调用 ASP.Net编写的一个webservices
- 为什么没反应???
- 谁做过txt文件和Prodox数据库之间转换的工具!
- 二进制存储到数据库时,碰到ASCII为#0时,自动截断?
- 急!急!急!BDE无法远程连接Oracle数据库:错误代码ORA-03114
- ado与bde的在存储过程的区别?
第一次,绘一个点:
x:200
Y:65
第二次,删除第一个点:显示两个点:
x: 199 200
y: 66 65
第三次,删除第二次的点,显示三个点:
x: 198 199 200
y: 65 66 65
第四次,删除第三次的点,显示四个点:
x: 197 198 199 200
y: 68 65 66 65
第五次,删除第四次的点,显示第五个点:
x: 196 197 198 199 200
y: 66 68 65 66 65
相当于是一种递归,x轴由200递减到0,y的值由65开始,可以是读取数组中的值.比如
TYPE
TECG = array[1..30] of integer;
const ecg1:TECG = ( 63, 63, 63, 63, 63, 64, 64, 65, 65, 66,//1
67, 68, 67, 67, 66, 65, 64, 63, 63, 63,
63, 63, 63, 63, 63, 63, 63, 63, 63, 63
);
当数据读取完一次,可以让它重复显示,