一个关于Assigned函数的问题?请进!(３０)

Question

我们知道Assigend()是判断一个指针或是对象是否指向空的函数.可以我现在遇到这样一个情况:在一个函数中如:
procedure TForm1.AA();
var
   A: TStringList;
begin
   if Assgined(A) then
     ShowMessage('true')
   else ShowMessage('false');
end;
//以上A没有创建,但这里执行时会显示True;
但是，如果我把这个A声明放到类的private或public..下面时．这里显示结果会是False
这是怎么会事？

Answer 1

http://community.csdn.net/Expert/topic/5649/5649122.xml?temp=.4644281
第三次看到类似的问题了,

Answer 2

原因是Assigned是判断指针是否为nil，而全局变量指针自动赋值为nil，而局部变量指针是个随机值。