掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
受信したデータをファイル化するには？ (ID：1832)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
> と言うことはprocedure TMainForm.AddMailListの部分に書くのですね？ > →上で書いた事 そういうことですね。 NMailPop3GetMailStatusでメールの情報を取得した後、本文もNMailPop3GetMailで取得します。 ひとまとめにしたものを、ファイルに保存し、そのファイル名をListItem.Dataに入れておけば、後で使えます。 dateに、yyyy/mm/dd hh:mm:ddで入ってくるので、 filename := 'mail' + Copy(date, 1, 4) // yyyy + Copy(date, 6, 2) // mm + Copy(date, 9, 2) // dd + Copy(date, 12, 2) // hh + Copy(date, 15, 2) // mm + Copy(Date, 18, 2); // ss でファイル名の頭を確定し、 seq := 0; while FileExists(filename + '_' + IntToStr(Seq) + '.txt') do Inc(seq); などとして、シーケンスまで決定します。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.