tyep
PRec=^Trec
Trec=record
s:string;
t:integer;
end;........
procedure ex;
ver
p:Prec;
t:trec;
begin
t.s='abc';
t.t=1;
p:=@t;
dispose(p); //能不能这么释放,会出现什么问题了end;
PRec=^Trec
Trec=record
s:string;
t:integer;
end;........
procedure ex;
ver
p:Prec;
t:trec;
begin
t.s='abc';
t.t=1;
p:=@t;
dispose(p); //能不能这么释放,会出现什么问题了end;
解决方案 »
- delphi webbrowser1 网页弹出 确认 阻止或拦截的问题
- TreeView读取Data问题
- 请大家帮忙看一段代码,delphi的,关于增加新用户模块的
- 数据库断开后如何退出系统?
- Help me! 错误为 cannot access fiekd 'ryid' as type variant'请专家会诊
- 怎样用存储过程添加数据
- 做过POS打印程序的高手快进来,求救,急,在线等
- 各位大哥,为什么我这个编译不通呀。
- 急呼各路英雄!!你知道吗?自定义纸张连续打印的问题?
- 请问一个查询的问题!
- 谁有 Overlapped I/O 完成例程 的封装模型?
- 使用TIdHttp.post时,从post开始到response返回,Form没有响应...如何解决?
因为p只是指向t的一个指针,t的内存分配是在函数的栈上,在离开函数的时候会自动回收。
这样做的后果是不可预见的,可能表现不出问题来,也可能程序会崩溃。