[Lazarus] Testing Assigned object
DrDiettrich1 at aol.com
Mon Apr 25 10:15:57 CEST 2011
> Is there a simple way to tell if slTest has been assigned in the
> following ?
> (without specifically assigning it to NIL in the declaration)
> slTest :TStringList;
> if Assigned(slTest) then FreeAndNil(slTest); // gives exception
When slTest is a local variable, you should initialize it to Nil.
Otherwise the variable contains garbage, that most probably is *not*
Nil, so that FreeAndNil tries to free something that never has been created.
More information about the Lazarus