可以啊,
var
x:integer;
.
.
setlength(array,5);//设置长度
x:=length(array);
var
x:integer;
.
.
setlength(array,5);//设置长度
x:=length(array);
解决方案 »
- 高手请进 关于Iddy10的IdTCPServer1绑定IP地址的问题
- 菜鸟的问题 希望高手告诉我好吗 (给10分)
- 各位前辈,随着技术的发展,delphi会长久茁壮的发展下去吗,至少在未来5-10年内,入内探讨谢了先
- 关于声卡的怪事
- 如何解决Data Field not permitted to open Dataset!
- 奇怪的问题:用Delphi可以搞单片机开发吗?
- 简单问题(在线待)
- 怎样取dbgrid中的值.
- 请问如何直接打印用query查询出来显示在dbgrid的数据?
- 让人郁闷的工作
- 焦点自动跳到下一个控件的函数是Perform 高分伺候
- 如何在dbgrid中增加多选功能(用shift实现,点ctrl实现的功能我已经有了)
type
TIntarray=array of integer;
var
IA,IB:Tintarray;
h,l,len:integer;
begin
setlength(IA,20)//分配内存空间给数组
IB:=IA;//把数组IA的内容整个复给IB
len(length(IB);
h:=high(IB);
l:=low(IB);
copy(IA,0,100)//把数组个数扩增到100个!
不知道我再给你几个例子!~
a:array [0..100] of string;
begin
showmessage(inttostr(sizeof(a)));
end;