vb的这一句有关数组的句子在delphi中如何准确表述?

sghff110 2011-07-25 09:17:06
vb句子: ReDim waver(-110600 To 110600) As Byte

delphi里面好像有个对应的setlength(),但不知功能语句进行套用。
...全文
72 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
hongss 2011-07-25
  • 打赏
  • 举报
回复
Delphi里下标不能是负数吧?
funxu 2011-07-25
  • 打赏
  • 举报
回复
vb 里定义的是 -110600 到 110600,所以实际上是110600*2大小的数组
你写的SetLength(wavebuf,110600);当然不够长了
应该这样
var
wavebuf: array of byte; //全局动态数组
begin
SetLength(wavebuf,110600*2);

sghff110 2011-07-25
  • 打赏
  • 举报
回复
var
wavebuf: array of byte; //全局动态数组
procedure TForm1.Scanp(const de: integer);
begin
// SetLength(wavebuf,110600); //这样写后边会子界超出下标范围,此处能否套用VB的该语句?
...
end;
sghff110 2011-07-25
  • 打赏
  • 举报
回复
那么delphi是否有其它办法来表述vb的ReDim waver(-110600 To 110600) As Byte?

zhuang_bx 2011-07-25
  • 打赏
  • 举报
回复
setlength(),只是设置数组大小,不能设置数组下标吧。

var waver:array of byte;

setlength(waver,1024);

16,748

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧