掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ファイル化したメールを表示するには？ (ID：1914)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
と言うことは１つ目の答えは以下の通りで良いのですか？ // メールの数を得る(APOP対応) No := NMailPop3Authenticate(S, PChar(Id), PChar(Password), ApopFlag); // 新しいUIDLを取得する NMailPop3GetUidl(S, NMAIL_GET_UIDL_ALL, strUIDL, Length(strUIDL)); // 新しいUIDLと保存したUIDLを格納するTStringListを作る SavedUIDL := TStringList.Create; NowUIDL := TStringList.Create; try // 保存したUIDL.lstをSavedUIDLに格納 SavedUIDL.LoadFromFile('uidl.lst'); except try // 初回起動(またはuidl.lstファイルがない)時に空のファイルを作って読み込む UIDLFs := TFileStream.Create('uidl.lst', fmCreate); // 何もしない？(例外発生) UIDLFs.WriteBuffer('', StrLen('')); finally if UIDLFs <> nil then UIDLFs.Free; end; SavedUIDL.LoadFromFile('uidl.lst'); end; // 新しいUIDLのStringListのテキストにstrUIDL(新しいUIDL)の内容を代入する NowUidl.Text := StrPas(strUIDL); ２つ目はEXEから実行すれば問題なくファイルは出来るようです。 次の質問は分かり次第書きます。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.