我有一批样本数据,适合存储成二维数组(Integer)的形式。为了提高程序的可修改性,我希望把这批数据存放在一个独立的Unit里面,写成常量的二维数组存放形式。这个Unit该怎么写呢?unit SinSampleUnit;interfaceimplementation1.这个二维数组该放在什么地方?2.常量的二位数组是怎么定义的?3.我要在Unit中直接写入数组元素(0.5, 1)的时候,语句是怎样的?
解决方案 »
- TcxTreeList节点
- 怎么作一个实时显示摄像头拍摄内容的程序,而且最好是不考虑摄像头差异的,通用的
- 爱delphi的人们,你们的前途在哪里?
- 关于用来画流程图的控件?各位大侠帮忙?
- 菜!!怎样建立 真正的全局变量??
- 急急!DICOM3.0 和HL7的概念及关系!
- delphi论谈除了这里,好像没有更好的论谈是吧.
- 为什么DBGrid在有数据的地方就不触发MOUSEDOWN事件,而在没有数据即空白处右键就触发MOUSEDOWN呢
- 关于ComBox问题!
- DBCheckBox对应的字段的值为"True"/"False", 但为什有个阴影?
- [求助]第一次编DLL文件,编译通过,但不能运行
- 请那位大侠告诉我,这样的软件界面的主窗体是用何种控件所做?
//在这里只有USES这个单元都能访问
implementation
//在这里只有本单元的下面能访问
end;
=((1, 5,11,1),
(6, 10,11,1),
(11,15,17,2),
(16,20,23,3),
(21,25,23,3),
(26,31,11,1),
(99,99,17,2)
);
a[0,2]:=234;
Graphics;
const
sinSampleNo = 20; //the number of sin funcion's sample
PI = 3.1415926535897932384626433832795;
type
TSinSample = array[0..sinSampleNo -1, 0..1] of double;
SinSample: TSinSample = ((-1.0*PI, 0),
(-0.9*PI, -0.30901699437494742410229341718282),
(-0.8*PI, -0.58778525229247312916870595463907),
(-0.7*PI, -0.80901699437494742410229341718282),
(-0.6*PI, -0.95105651629515357211643933337938),
(-0.5*PI, -1.00000000000000000000000000000000),
(-0.4*PI, -0.95105651629515357211643933337938),
(-0.3*PI, -0.80901699437494742410229341718282),
(-0.2*PI, -0.58778525229247312916870595463907),
(-0.1*PI, -0.30901699437494742410229341718282),
(0, 0),
(0.1*PI, 0.30901699437494742410229341718282),
(0.2*PI, 0.58778525229247312916870595463907),
(0.3*PI, 0.80901699437494742410229341718282),
(0.4*PI, 0.95105651629515357211643933337938),
(0.5*PI, 1.00000000000000000000000000000000);
(0.6*PI, 0.30901699437494742410229341718282),
(0.7*PI, 0.58778525229247312916870595463907),
(0.8*PI, 0.80901699437494742410229341718282),
(0.9*PI, 0.95105651629515357211643933337938),
(1.0*PI, 0));implementationend.
可是为什么这个完整的单元在编译时出现错误:?
'=' expected but ':' found光标停在SinSample:
的冒号后面。
↑挿入"const"常量定義説明。