很正常的代码怎么会出错了!!! ( 积分: 0 )

W

winni

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-17

• #1

var
buf:array of byte;
tebuf:array of byte;
tezhen:array of byte;
begin
getmem(buf,262144);
getmem(tebuf,20);
getmem(tezhen,20);
freemem(buf) ;
freemem(tezhen);
freemem(tebuf);
end;

没有问题吧,怎么会这样呢

 

W

winni

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-17

• #2

var
buf:array of byte;
tebuf:array of byte;
tezhen:array of byte;
begin
getmem(buf,262144);
getmem(tebuf,20);
getmem(tezhen,20);
freemem(buf) ;
freemem(tezhen);
freemem(tebuf);
end;

没有问题吧,怎么会这样呢

 

W

winni

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-17

• #3

存取违例, 大家试试 ,每次都会

 

O

orangutang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-17

• #4

wokao! 一毛不拔， 问了一个狗屁不通的问题! 你耍人玩哪？ 吃饱了撑的？ 你们家“很正常”的代码是这么写的吗？

 

别

别长江

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-18

• #5

楼上说的对呀呵呵

 

Z

zhangchunzhao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-18

• #6

没问题啊，不过缩进有问题，一个好的程序员，程序缩进会很统一的，啊，下次再努力啊！

 

千

千禧狼龟

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-21

• #7

只能帮顶了。。

 

W

winni

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-23

• #8

数组只能用setlength和buf:=nil ，是否会出错