【搞定】怎样定义数组（？）**

泉海天轻纺

在x3里怎样定义数组

twins_tony

http://bbs.justep.com/forum.php? ... hlight=%CA%FD%D7%E9

liubin

var
   f: array of Integer;
   i: integer;
begin
SetLength(f,9);
1:如果只写上面的代码是定义 一个0-9长度的Integer的数组吗?   
2: 上面的定义是否等于D6 中的 f: array [0..9] of Integer

lixy

一个是动态的，一个是静态的。
但一般使用的话，区别不大。

liubin

var
   buffer: array of char;
begin
  System.JSRuntimeService.SetLength(buffer, 512);
endl;

SetLength出错,平台怎么把Char转化能String
[错误](50, 37): Incompatible types: "String&" and "Char[]"

liubin

顶

jiahaiminghr

这样写：
SetLength(buffer, 512);

liubin

问题1 : 在D6上  retcode := et_GetSN(hET99, @buffer[0]);方法       @buffer[0] 参数是取buffer数组的开始地址,在平台上编译出错,请问平台怎么写?
问题2 : 7楼的SetLength 是在哪个命名空间下的方法?

lixy

1、平台首先是不支持指针的。你要想办法避开指针。
2、默认就有那个函数，不用引入特殊的空间

liubin

var
  buffer: array of char;
  retcode,I: Integer;
begin
  SetLength(buffer, 512);
  for I := 0 to 512 do
     buffer[I] := char(0); <---------------编译没错,运行出错,如下图怀疑是  SetLength方法有问题SetLength方法打( 我都看不见参数

  retcode := GCUSB.head.et_GetSN(hET99, @buffer[0]);
   for I := 0 to 7 do
   begin
    Result := Result + IntToHex(byte(buffer[I]),2)+' ';
   end;
end