易截截图软件、单文件、免安装、纯绿色、仅160KB

Delphi这么灵异的？

Delphi(Pascal) code:

var
str:array of string;
i:Integer;
j:Integer;
begin
SetLength(str,1);
for i:=0 to 4 do
begin
j:=Length(Str);
SetLength(str,Length(str)+1);
Str[Length(Str)]:='xxxx';
end;
ShowMessage(str[0]);
ShowMessage(str[1]);
ShowMessage(str[2]);
ShowMessage(str[3]);
end;



几个奇怪的地方，调试发现，i的值在第一次循环居然是5，第2次是4，第3次是3.。。。 不是应该从0-4的吗？？？

还有，为什么j:=Length(Str);为什么一直告诉我是随机数？调试发现str里面的元素个数确实是在递增呀！得到数组的长度怎么搞？Length也不行，SizeOf也不行？

搞了几天，发现Delphi太不适合我用了，怎么都这么奇怪的，和观念很冲突
LZ 在愚弄大众？
那是编译器优化的结果……
引用
  得到数组的长度怎么搞？Length也不行，SizeOf也不行？


high(Str)得到数组上标
low(Str)得到数组下标

就可以得到数组元素的数量了，不知道你说的数组的长度是不是这个？？
我不管用用啥都不行

把灵异的图发上来




最下方居然有个  never used??????Fuck
当编译器“认为”递减和递增效果一样时，因为递减到0执行速度更快，所以你就觉得“灵异”了
j说是被优化了？？？那我怎么得到数组元素的个数啊？？？
把Compiler里面的Optimaztion关掉，就可以去掉优化选项�


相关问答：

delphi QQ群 93282714

欢迎热爱编程，谦虚好学的人加入
群中有谁

up

引用
群中有谁

有聊天的人，谈技术的人。

加入……

up
up
up
up

初学者，加入一个！！

Up

UP

加

新手++
......

delphi内存池 实现

delphi 下可有源码 实现内存池 固定分配内存池大小的。。内存池满后自动转储数据到。。指定的一个临时文件，

不知道可否哪位兄弟做过类似的例子。。。。。最好有演示源码。。。谢谢
搜一搜,总会有...

......

关于DELPHI的两个小疑问 谢谢各位！

1、DELPHI中NEW一个Application，运行起来的时候可以在任务管理器中查看到这个project1.exe的线程数为3，我想知道这三个线程分别是什么，在什么情况下创建的?
2、如果我当前打开了N个DELPHI环境，这时候我想通过� ......

delphi过滤htm的问题

HTML code:
<th scope="col">快件单号</th><th scope="col">操作时间</th><th scope="col">快件流程</th>
</tr><t ......

delphi ado连接远程服务器数据库问题

各位帮个忙，请问用delphi怎么样远程连接服务器数据库，我连接本地的程序为什么有错？

adoquery1.ConnectionString:='Provider=SQLOLEDB.1;Password=;Persist  Security  Info=True;User&nbs ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号