掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ListView.Item.Dataに登録したTStringListはFreeが必要でしょうか? (ID:151368)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
メモリ使用量とか作法とか気にしないなら別にそのままでも終了時に勝手にメモリは解放されるでしょう その処理を繰り返したり使っているうちに謎のエラーが出て悩むなら 最初からFreeも実装したほうがいいかもね ぐらいでしょうか? リストから削除する処理で procedure ListDelete(Index : Integer); var ts : TStringList; begin ts := TStringList(ListView1.Items[i].Data); ts.Free; ListView1.Items.Delete(Index); end; こんな感じ Clearも作ると procedure ListClear(); var i : Integer; begin for i:= Count-1 downto 0 do begin ListDelete(i); end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.