ひまわりユーザー プログラム掲示板 バックアップ
注意
ひまわりのススメ  □ ひまわり本家Home  □ 新着記事  □ 新規投稿  □ SEARCH  □ 参考プログラム集
ツリー表示

MESSAGE ひまわりdeインターネット104 /のぐちゃん (02/03/23(Sat) 15:05) [643]


親記事 / 返信無し
NO.643  ひまわりdeインターネット104
□投稿者/ のぐちゃん -(2002/03/23(Sat) 15:05:41)
□U R L/
{---プログラム掲示板投稿フォーム---
【ソフト名】ひまわりdeインターネット (バージョン 1.04)
【作 成 者】のぐちゃん (連絡先:kazutosi101@msn.com)
【種  別】フリーソフトウェア
【ひまわりのバージョン】ver.1.33
【転  載】可(転載条件:ご自由に)
【改変運用】可(投稿したプログラムを他人が改造し運用することを許すか)
【ひまわり本体への梱包】可
【実行時に利用作成するファイル】無
【コメント】何だかIEっぽくなってきた。
こまめに更新!
---投稿フォームここまで---}
{ひまわりdeインターネット}
終了の時に、終了処理設定。
HKEY_CURRENT_USERの、`Control Panel\Colors`を、レジストリ開く。
`ButtonFace`を、レジストリ読む。それを、『 』で、区切る。
レジストリ閉じる。
母艦背景色は、RGB(それ#0, それ#1, それ#2)。
*INI読む
「himawarideinternet.ini」が、存在するか。
もし、それが、いいえならば、(
himablowimgは、ランタイムのパス&himawari.ico。
Webアドレスフォントは、System。
母艦の、幅は、740。
オブジェクト作成へ、飛ぶ。
)。
「himawarideinternet.ini」から、フォームの位置復元。
『himawarideinternet.ini』の、INIファイル開く。
『icon』の、『file』を、INIファイル読む。
himablowimgは、それ。
『adress』の、『font』を、INIファイル読む。
Webアドレスフォントは、それ。

INIファイル閉じる。
*オブジェクト作成

母艦の、背景色は、母艦背景色。

母艦の、タイトルは、「ひまわりdeインターネット」。

操作メニューを、メニュー作成。
その、テキストは、「操作(&C)」。

操作メニューに、新規作成メニューを、メニュー追加。

新規作成メニューに、ウィンドウメニューを、メニュー追加。
その、ショートカットキーは、「Ctrl+W」。
その、イベントは、コマンドライン引数#0を、起動。'←ひまわりエディタから起動したときはダメ!!

新規作成メニューに、メールメニューを、メニュー追加。
その、ショートカットキーは、「Ctrl+M」。
その、イベントは、「mailto:」を、起動。

操作メニューに、URLへ飛ぶメニューを、メニュー追加。
その、イベントは、(
『URLは?』と、尋ねる。
もし、それが、「」ならば、ブラウザの、URLは、「http://search.msn.co.jp/」。
ブラウザの、URLは、それ。
)。
その、ショートカットキーは、「Ctrl+U」。

操作メニューに、戻るメニューを、メニュー追加。
その、イベントは、ブラウザの、URLは、『javascript:history.back(1)』

操作メニューに、進むメニューを、メニュー追加。
その、イベントは、ブラウザの、URLは、『javascript:history.go(1)』

操作メニューに、選択して開くメニューを、メニュー追加。
その、イベントは、(
「HTML ファイル(*.htm;*.html)|*.htm;*.html|CGI ファイル(*.cgi)|*.cgi|JPEG 画像(*.jpg;*.jpe;*.jpeg)|*.jpg;*.jpe;*.jpeg|GIF 画像(*.gif)|*.gif|PNG 画像(*.png)|*.png|ART ファイル(*.art)|*.art|AU ファイル(*.au)|*.au|AIFF ファイル(*.aif;*.aiff)|*.aif;*.aiff|XBM ファイル(*.xbm)|*.xbm|すべてのファイル(*.*)|*」の、読込ファイル選択。
もし、それが、「」ならば、待機。
ブラウザの、URLは、それ。
)。
その、ショートカットキーは、「Ctrl+O」。

操作メニューに、初期化メニューを、メニュー追加。
その、イベントは、ブラウザの、URLは、「http://www.text2music.com/hima/index.htm」。
その、ショートカットキーは、「Ctrl+Shift+N」。

操作メニューに、ひまわりBBSへ飛ぶメニューを、メニュー追加。
その、イベントは、ブラウザの、URLは、「http://www.text2music.com/cgi/bbs/hiptree/cbbs.cgi」。
その、ショートカットキーは、「Ctrl+B」。

操作メニューに、更新メニューを、メニュー追加。
その、イベントは、(
ブラウザの、URLは、「{ブラウザの、URL}」。
)。
その、ショートカットキーは、「{F5}」。

操作メニューに、Webアドレスエディタのフォントメニューを、メニュー追加。
その、イベントは、(
フォント選択。
Webアドレスエディタの、フォント書体は、それ。
)。
その、ショートカットキーは、「Ctrl+F」。

操作メニューに、リンクメニューを、メニュー追加。

リンクメニューに、text2music.comメニューを、メニュー追加。
その、イベントは、ブラウザの、URLは、『http://www.text2music.com』。

リンクメニューに、ひまわり本家メニューを、メニュー追加。
その、イベントは、ブラウザの、URLは、『http://www.text2music.com/hima/index.htm』。

リンクメニューに、ひまわりBBSメニューを、メニュー追加。
その、イベントは、ブラウザの、URLは、『http://www.text2music.com/cgi/bbs/hiptree/cbbs.cgi』。

リンクメニューに、窓の社メニューを、メニュー追加。
その、イベントは、(
『FTP? HTTP?』を、『Http|Ftp』の、リストから選択。
もし、それが、Httpならば、ブラウザの、URLは、『http://www.forest.impress.co.jp/』。
違えば、ブラウザの、URLは、『ftp://ftp.forest.impress.co.jp』。
)。

リンクメニューに、Vectorメニューを、メニュー追加。
その、イベントは、(
『FTP? HTTP?』を、『Http|Ftp』の、リストから選択。
もし、それが、Httpならば、ブラウザの、URLは、『http://www.vector.co.jp/』。
違えば、ブラウザの、URLは、『ftp://ftp.vector.co.jp/』。
)。

リンクメニューに、Windowsファミリーメニューを、メニュー追加。
その、イベントは、(
ブラウザの、URLは、『http://www.microsoft.com/japan/windows/』。

)。

リンクメニューに、WindowsUpdateメニューを、メニュー追加。
その、イベントは、(
ブラウザの、URLは、『http://windowsupdate.microsoft.com/』。
)

リンクメニューに、MSNメニューを、メニュー追加。
その、イベントは、(
ブラウザの、URLは、『http://www.msn.co.jp/』。
)

リンクメニューに、MSNサーチメニューを、メニュー追加。
その、イベントは、(
ブラウザの、URLは、『http://search.msn.co.jp/』。
)

操作メニューに、-を、メニュー追加。

操作メニューに、終了メニューを、メニュー追加。
その、イベントは、終わり。
その、ショートカットキーは、『Alt+F4』。

Webアドレスエディタを、エディタとして、作成。
その、サイズは、(0,0,330,20)。
その、ファイルドロップは、オン。
その、フォント書体は、Webアドレスフォント。
その、フォントサイズは、11。

(355,0)へ 移動。
移動ボタンを、ボタンとして、作成。
その、テキストは、「Go!↓」
その、イベントは、(
ブラウザの、URLは、Webアドレスエディタ。
Webアドレスエディタは、『』。
)。
その 幅を 60に 設定

(420,0)へ 移動。
戻るボタンを、ボタンとして、作成。
その、テキストは、「←戻る」
その、イベントは、(
進むボタンの、有効は、オン。
ブラウザの、URLは、『JavaScript:history.back(1)』。
)。
その 幅を 60に 設定

(483,0)へ 移動。
進むボタンを、ボタンとして、作成。
その、テキストは、「進む→」
その、イベントは、ブラウザの、URLは、『JavaScript:history.go(1)』。
その 幅を 60に 設定
その、有効は、オフ。

(546,0)へ 移動。
更新ボタンを、ボタンとして、作成。
その、テキストは、「更新⇔」
その、イベントは、ブラウザの、URLは、「{ブラウザの、URL}」。
その 幅を 60に 設定

(608,0)へ 移動。
ホームボタンを、ボタンとして、作成。
その、テキストは、「ホーム⇒」。
その、イベントは、ブラウザの、URLは、『http://www.text2music.com/hima/index.htm』。
その 幅を 68に 設定

(700,0)へ 移動。
himaimgを、イメージとして、作成。
その、画像は、himablowimg。
その、イベントは、(
「16色・256色アイコン|*.ico」の、読込ファイル選択。
もし、それが、「」ならば、待機。
himablowimgは、それ。
himaimgの、画像は、himablowimg。
)。
ブラウザを、ブラウザとして、作成。
その、URLは、『http://www.text2music.com/hima/index.htm』。'起動したときに表示するページ
母艦の、変更した時は、(
ブラウザの、サイズは、(0,35,(母艦の、幅),(母艦の、高さ))。
himaimgの、Xは、(母艦の、幅)-37。
母艦背景色で、画面クリア。
)。
ブラウザの、サイズは、(0,25,(母艦の、幅),(母艦の、高さ))。
待機
*終了の時
「himawarideinternet.ini」へ、フォームの位置記録。
『himawarideinternet.ini』の、INIファイル開く。
それは、himablowimg。
『icon』の、『file』へ、INIファイル書く。
それは、Webアドレスエディタの、フォント書体。
『adress』の、『font』へ、INIファイル書く。
INIファイル閉じる。



- Child Tree -