如何定义常量数组

Question

如何定义字符串常量数组,1000个元素?
定义后如何赋值,1000个元素怎样写死
寻求一快捷方法???

Answer 1

const
  table: array[0..255] of DWORD =
   ($00000000, $77073096, $EE0E612C, $990951BA,
    $076DC419, $706AF48F, $E963A535, $9E6495A3,
    $0EDB8832, $79DCB8A4, $E0D5E91E, $97D2D988,
...)

Answer 2

如果值有规律，就用for循环
const
  ARRCONST:array [1 .. 100] of integer;
...
for i:=low(ARRCONST) to high(ARRCONST) do
  ARRCONST[i]=i;