ITPub博客

首页 > Linux操作系统 > Linux操作系统 > Delphi的大Bug (转)

Delphi的大Bug (转)

原创 Linux操作系统 作者:worldblog 时间:2007-12-12 13:56:05 0 删除 编辑
Delphi的大Bug (转)[@more@]

Delphi,Update2出来了,赶紧去!


bug:


代码如下:


procedure TForm1.Button1Click(Sender: Tobject);
var
  strings :TStringList;
begin
  if not Assigned(strings) then
  begin
  strings :=TStringList.Create;
//  ShowMessage('sfdasfd');如果加上这样或那样的句子就没有问题,否则,哈哈.
  end;
  strings.free;
  strings := nil;
end;


汇编代码如图:错误图出现错误


正确图


正确


在错误的结果中,窗口被Free了,所以就没有窗口了.


你还可以写一些类似的代码去验证.好了注意就是了.


来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10752043/viewspace-992057/,如需转载,请注明出处,否则将追究法律责任。

下一篇: 视图的概念 (转)
请登录后发表评论 登录
全部评论
  • 博文量
    6241
  • 访问量
    2449168