2.ランチャーを作る

◆どう作るか

今回も前回同様、どう作るかを決めてから作成に入りましょう。

今回は、

1. ボタンを作成
2. ボタンが押されたら、そのボタンに合わせたアプリケーションを起動
3. あとは、適当にアレンジ

のようにします。

◆作成

どう作るかを考えたので、早速作成に取り掛かりましょう。
前回より数倍簡単ですから。

◇ボタンを作成

まずは1の「ボタンを作成」です。

objsize 50,50				;ボタンのサイズを設定
pos 0,0 : button goto "メモ帳",*memo		;メモ帳ボタン
pos 50,0 : button goto "電卓",*calc		;電卓ボタン
pos 100,0 : button goto "タスク",*task	;タスクマネージャボタン
pos 0,50 : button goto "プロンプト",*cmd	;コマンドプロンプトボタン
pos 50,50 : button goto "レジストリ",*reg	;レジストリエディタボタン
pos 100,50 : button goto "終了",*exit	;終了ボタン
stop

*memo

*calc

*task

*cmd

*reg

*exit

objsize命令でボタンの大きさを50×50に設定して、各ボタンを作成しています。
HSPのbutton命令は、第二パラメータに押された時にジャンプするラベルを指定するので、とりあえずラベルを作ってあります。

◇ボタンが押されたら、そのボタンに合わせたアプリケーションを起動

ボタンが押された時の処理をプログラムします。

objsize 50,50
pos 0,0 : button goto "メモ帳",*memo
pos 50,0 : button goto "電卓",*calc
pos 100,0 : button goto "タスク",*task
pos 0,50 : button goto "プロンプト",*cmd
pos 50,50 : button goto "レジストリ",*reg
pos 100,50 : button goto "終了",*exit
stop

*memo
exec "notepad"		;メモ帳の起動
stop

*calc
exec "calc"		;電卓の起動
stop

*task
exec "taskmgr"		;タスクマネージャの起動
stop

*cmd
exec "cmd"		;コマンドプロンプトの起動
stop

*reg
exec "regedit"		;レジストリエディタの起動
stop

*exit
end			;プログラムの終了

ボタンを押してジャンプするラベルに、exec命令でプログラムを起動する処理をプログラムしています。
stop命令を入れているのは、入れないと勝手に次のラベルへ行き、全てのアプリケーションが起動して終了してしまうからです。

あとは、適当に改造してやってください。

◆完成スクリプト

width 150,100
title "ランチャー"

objsize 50,50
pos 0,0 : button goto "メモ帳",*memo
pos 50,0 : button goto "電卓",*calc
pos 100,0 : button goto "タスク",*task
pos 0,50 : button goto "プロンプト",*cmd
pos 50,50 : button goto "レジストリ",*reg
pos 100,50 : button goto "終了",*exit
stop

*memo
exec "notepad"
stop

*calc
exec "calc"
stop

*task
exec "taskmgr"
stop

*cmd
exec "cmd"
stop

*reg
exec "regedit"
stop

*exit
end

Powered by HSPLet 3.0

今回はオレ様クオリティーなんて考えてません。最も単純にやりました。

実例講座へ戻る

Homeへ戻る