掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
StringListがCreateされているかどうかの判定 (ID：44772)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
単にnilを代入しているかどうかだけの違いではないでしょうか。 次のように aSL := nil を入れてやると、質問者の意図した動きになります。 procedure TForm1.Button1Click(Sender: TObject); var aSL:TStringList; begin aSL := nil; // 追加。 if Assigned(aSL) then ShowMessage('step1 before create'); aSL := TStringList.Create; if Assigned(aSL) then ShowMessage('step2 after create'); aSL.Free; aSL := nil; // 追加。 if Assigned(aSL) then ShowMessage('step3 after free'); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.