HSP3でステータスバーを表示させる - いろいろ開発Wikiページ

メニュー

• トップページ
• HSP開発関連

裏技など

htmlプラグインエラー: このプラグインを使うにはこのページの編集権限を「管理者のみ」に設定してください。

---

HSP3でステータスバーを表示させる

↓こんな感じでいいですか？

; ステータスバーを表示するモジュール Ver.1.0
; このスクリプトはHSP3専用です

#uselib "comctl32.dll"
#func global InitCommonControls "InitCommonControls"

#module __sttbar__

#deffunc sttdisp array partpos		;ステータスバー(だけ)を表示

InitCommonControls

winobj "msctls_statusbar32","",0,0x50000003
hStatus = objinfo_hwnd(stat)

chkstt=length(partpos)
num=chkstt
if(chkstt=0):num=0:partpos=-1

sendmsg hStatus, 0x0404, num, varptr(partpos)

return

#deffunc sttmes int meshndl,str STATUS	;ステータスバーに文字列を表示

sendmsg hStatus, 0x0401, meshndl, STATUS

return

#global

この下に”sttbar.as”というファイルがあります。