掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TListViewの内容をファイルに保存するには？ (ID:4078)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
さっそくの返答ありがとうございます。 上に書いていただいたソースを参考にして下記のように書いて実行したところ例外でとまってしまいました。 procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); var FSL: TStringList; LSL: TStringList; i: integer; begin FSL := TStringList.Create; LSL := TStringList.Create; for i := 0 to ListView1.Items.Count do begin LSL.Assign(ListView1.Items.Item[i].SubItems); LSL.Insert(0, ListView1.Items.Item[i].Caption); FSL.Add(LSL.CommaText); end; try FSL.SaveToFile('aaa.txt'); finally LSL.Free; FSL.Free; end; end; 例外が出た箇所は LSL.Assign(ListView1.Items.Item[i].SubItems); のところです。FormCloseのところでやるのがいけないのかと思い、色々やってみたのですがやはり例外が出てとまってしまいます。 どこがいけないのでしょうか？教えてください。よろしくお願いします。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.