如何判断一个TStringList的变量是否已经创建？(100分)

foolaliu · 2003-03-04

如题。 我用Assigned函数不起作用，有高手知道吗？

41426277 · 2003-03-04

if TStringList=nil then showmessage('is null');

foolaliu · 2003-03-04

不对，没起作用

kgafly · 2003-03-04

if 变量名 is TStringList then

leeeeleeee · 2003-03-04

if Assign(List) then List:=TstringList.create;

liuyanx · 2003-03-04

设置个异常试试 try   strlist.free; except   showmessage('没有创建！') end;

zxbyh · 2003-03-04

UnAssigned行不行?? 我也没试过 if 变量名=UnAssigned then begin     showmessage('没有创建'); end;

雪中漫步 · 2003-03-04

tstirnglist 很有意思 你即使不创建，给它add,他也不报错！

薄荷 · 2003-03-04

你的问题是因为你的stringlist一定是申明为局部变量了。申明为全局变量就没有问题了。 比如： var MyStr: TStringList; .... begin      //MyStr := TStringList.Create;      if Assigned(MyStr) then         ShowMessage('Assigned!')      else         ShowMessage('Unassigned!'); end;

薄荷 · 2003-03-04

原因是Assigned函数检查指针是否为nil，全局变量的指针自动初始化为nil，而局部的 不会，指针是个不定值。所以Assigned失效。 to 雪中漫步 不报错是因为你一定也是申明的局部变量，这个时候这个变量不是nil，所以没有报错， 但是不能访问它。 不如如果你接着再写： Self.Caption := MyStr[0];就出错了。 比如： var   MyStr: TStringList; begin      //MyStr := TStringList.Create;      MyStr.Add('a');      Caption := MyStr[0];  //出错！      if Assigned(MyStr) then         ShowMessage('Assigned!')      else         ShowMessage('Unassigned!'); end;

zjan521 · 2003-03-06

同意,对变量的初始值要确定的把握. 曾有文章说为了效率,不作无用的初始化, 但我觉得多加几句没什么坏处. 局部变量是在堆栈中的,对象仅仅是一个指针

如何判断一个TStringList的变量是否已经创建？(100分)

foolaliu

Unregistered / Unconfirmed

41426277

Unregistered / Unconfirmed

foolaliu

Unregistered / Unconfirmed

kgafly

Unregistered / Unconfirmed

leeeeleeee

Unregistered / Unconfirmed

liuyanx

Unregistered / Unconfirmed

zxbyh

Unregistered / Unconfirmed

雪中漫步

Unregistered / Unconfirmed

薄荷

Unregistered / Unconfirmed

薄荷

Unregistered / Unconfirmed

zjan521

Unregistered / Unconfirmed

Similar threads