作品プログラム
- 動作環境
- プロデル 2.0.1322 Windows 10
- 投稿者
- ohisama
- 投稿日
- 2026-01-08 07:13:15
- ダウンロード数
- 35
作品のプログラム
//POP3スパムフィルター
マイアカウントというアカウントを作る
マイアカウントのプロトコルは、「POP3」
マイアカウントの受信サーバのサーバ名は、「mail.biglobe.ne.jp」
マイアカウントの受信サーバのポート番号は、995
マイアカウントの受信サーバのユーザ名は、「***」
マイアカウントの受信サーバのパスワードは、「***」
マイアカウントの受信サーバの暗号化方式は、SSL
メイン画面を表示する
待機する
メイン画面とは
+ メイン受信トレイ
+ スパム
ウィンドウを継承する
はじめの手順
初期化する
終わり
初期化する手順
この実質大きさを{601,394}に変える
この内容を「POP3スパムフィルター」に変える
初期化開始する
受信リストビューというリストビューを作る
その位置と大きさを{0,32,601,362}に変える
その表示方法を「詳細」に変える
その全列選択を○に変える
その見出し一覧を{「件名」,「差出人」,「送信日時」}に変える
その見出し幅を{318,132,123}に変える
その移動順を2に変える
そのドッキング方向を「全体」に変える
ツールバー1というツールバーを作る
その位置と大きさを{0,0,601,32}に変える
その内容を「ツールバー1」に変える
その移動順を1に変える
受信ボタン部品というボタン部品をツールバー1へ作る
その内容を「受信」に変える
その表示を○に変える
その大きさを{52,29}に変える
その表示位置を「Text」に変える
その説明を「受信中」に変える
削除ボタン部品というボタン部品をツールバー1へ作る
その内容を「削除」に変える
その表示を○に変える
その大きさを{52,29}に変える
その表示位置を「Text」に変える
その説明を「削除」に変える
初期化終了する
この設計スケール比率を{84,84}に変える
終わり
受信する手順
マイアカウントの受信サーバへ接続する
メイン受信トレイは、マイアカウントから受信したもの
メール件数は、メイン受信トレイの件数
スパムという真偽値の配列(メール件数)を作る
数を1からメール件数まで増やしながら繰り返す
スパム(数)は、偽
そして
受信件数は、メール件数
受信リストビューをクリアする
受信リストビューを更新開始する
メイン受信トレイの一覧を、要素へそれぞれ繰り返す
受信リストビューに要素の件名を追加する
その詳細を{要素の差出人, 要素の送信日}に変える
そのタグを要素に変える
そして
受信リストビューを更新終了する
受信件数を表示する
終わり
削除する手順
マイメールは、メイン受信トレイの一覧
数を1からスパムの個数まで増やしながら繰り返す
スパム(数)が偽なら
//マイメール(数)の件名を表示する
マイメール(数)を削除する
そして
そして
マイアカウントの受信サーバから切断する
終わり
受信リストビューがダブルクリックされた時の手順
スパム(受信リストビューの選択項目の番号)は、真
メールは、受信リストビューの選択項目のタグ
メール画面というメールウィンドウを作る
メール画面にメールを読み込む
メール画面を表示する
終わり
受信ボタン部品がクリックされた時の手順
受信する
終わり
削除ボタン部品がクリックされた時の手順
削除する
「削除しました。」を表示する
終わり
終わり
メールウィンドウとは
ウィンドウを継承する
はじめの手順
初期化する
終わり
初期化する手順
この実質大きさを{693,394}に変える
この内容を「メールウィンドウ」に変える
初期化開始する
本文テキスト領域というテキスト領域を作る
その位置と大きさを{0,94,693,300}に変える
そのドッキング方向を「全体」に変える
パネル1というパネルを作る
その位置と大きさを{0,0,693,94}に変える
その移動順を1に変える
そのドッキング方向を「上」に変える
ヘッダテキスト領域というテキスト領域をパネル1へ作る
その位置と大きさを{0,0,693,94}に変える
そのドッキング方向を「全体」に変える
初期化終了する
この設計スケール比率を{144,144}に変える
終わり
自分に【メール】を読み込む手順
自分の内容は、メールの件名
宛先は、メールの宛先
ヘッダテキスト領域の内容は、「宛先:[宛先(1)]
差出人:[メールの差出人]」
本文テキスト領域の内容は、メールの本文
終わり
終わり