HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2014
0721
かいと画像ボタンについて4未解決


かいと

リンク

2014/7/21(Mon) 17:12:20|NO.63018

最近HSPを始めたものですが、
画像をボタンにするのができません。
いろいろググってみたんですが、、、
やっぱり駄目でした。どなたかソースコードとか、おしえてくれませんか?



この記事に返信する


E.T

リンク

2014/7/21(Mon) 18:42:11|NO.63019

リファレンスで「ボタン」で検索すれば出るけど…
ソースのせるのはめんどいのでリファレンスの見方をおしえます。
HSPスクリプトエディタでF1をおします。
そしたら左上にテキストボックスがあるので「ボタン」と入力
検索するとしたから3番目ぐらいに
objimage.hspがあるともいますのでそれを参考にしてください。



掘木

リンク

2014/7/21(Mon) 18:51:12|NO.63020

グーグルのみならず、この掲示板の過去ログ、付属のサンプルにも情報はありますよ。

1.過去に似たような質問はありませんか?
  (この質問に関しては、明らかに類似した質問があり、回答がありますよ・・・?)
  (正しく検索できればグーグルからも過去ログに当たるはずですが。)

2.不要な情報ばかりの場合、絞り込み検索は試しましたか?
  検索結果で得られた情報は試せる範囲で試しましたか?
  また、その試した結果がどういう理由で『駄目』なのですか?

  実は成功してるが失敗していると思いこんでいるだけかもしれません。
  分かる範囲で、具体的に状況を説明してみると解決に向かう可能性があります。

検索結果を載せない外道。調べ方も身につけるものでしょう?



GOMEKIT!

リンク

2014/7/21(Mon) 22:15:35|NO.63022

〜HSP 画像 ボタン -Google検索〜
https://www.google.co.jp/search?hl=ja&source=hp&q=HSP+%E7%94%BB%E5%83%8F+%E3%83%9C%E3%82%BF%E3%83%B3&gbv=2

〜画像付きボタン -HSPTV!掲示板〜
http://hsp.tv/play/pforum.php?mode=pastwch&num=307


簡易的な疑問はググるなりするなど有力となる情報を探し出す。
この掲示板の過去ログで同じ質問が重複していないか探すと良い。
どうしても解決できない、過去ログ遡ったりググったりしても自分が求めていた情報が無いなどそのために掲示板はある。



GOMEKIT!

リンク

2014/7/23(Wed) 07:08:38|NO.63029

ほれ。

;***** イメージボタンに設定 (fileop14.hsp) ***** #module ;▼必要となるAPIや定数の定義 #uselib "user32.dll" #func GetClassName "GetClassNameA" int,var,int #func CharUpper "CharUpperA" var #func SetWindowLong "SetWindowLongA" int,int,int #func ReleaseDC "ReleaseDC" int,int #uselib "gdi32.dll" #cfunc CreateCompatibleBitmap "CreateCompatibleBitmap" int,int,int #cfunc CreateCompatibleDC "CreateCompatibleDC" int #func SelectObject "SelectObject" int,int #func BitBlt "BitBlt" int,int,int,int,int,int,int,int,int #func DeleteDC "DeleteDC" int #define GWL_STYLE $FFFFFFF0 #define BM_SETIMAGE $000000F7 #define BS_BITMAP $00000080 #deffunc imagebtn int prm1,int prm2,int prm3,int prm4,int prm5,int prm6 ; ; ・引数 objectID (int) : 0〜objectMAX HSPオブジェクトID ; nWinID (int) : 0〜 bufferイメージ格納ID ; plx (int) : 0〜winx(0) 位置 x ; ply (int) : 0〜winy(0) 位置 y ; pbx (int) : 0〜winx(0) 幅 ; pby (int) : 0〜winy(0) 高さ mref bmscr,67 objectID = prm1 : if (objectID<0)|(objectID>bmscr(72)) : return -1 nWinID = prm2 ;bufferからのコピーに対応する nWinID(1)=bmscr(18) ;現在アクティブなウィンドウID gsel nWinID : mref g_bmscr,67 : gsel nWinID(1) plx = prm3 : if (plx<=0)|(plx>ginfo(12)) : plx=0 ply = prm4 : if (ply<=0)|(ply>ginfo(13)) : ply=0 pbx = prm5 : if (pbx<=0)|(pbx>ginfo(12)) : pbx=0 pby = prm6 : if (pby<=0)|(pby>ginfo(13)) : pby=0 hCld = objinfo(objectID,2) : if hCld==0 : return -1 ;コントロールがボタンかどうか String="" GetClassName hCld,String,64 : CharUpper String if String!"BUTTON" : return -1 hBitmap=CreateCompatibleBitmap(g_bmscr(4),pbx,pby) if hBitmap==0 : return -1 hdc_mem=CreateCompatibleDC(g_bmscr(4)) if hdc_mem==0 : return -1 SelectObject hdc_mem,hBitmap BitBlt hdc_mem,0,0,pbx,pby,g_bmscr(4),plx,ply,$00CC0020 SetWindowLong hCld,GWL_STYLE,$50000000|BS_BITMAP ;BM_SETIMAGE メッセージ送信 sendmsg hCld,BM_SETIMAGE,0,hBitmap DeleteDC hdc_mem ReleaseDC hCld,g_bmscr(4) return 0 #global ;***** sample ***** pos 0,0 : picload dirinfo(1)+"\\sample\\demo\\jp6girl.bmp" objsize 280,480 : pos 0,0 : button "",*jump imagebtn 0,0,0,0,280,480 stop *jump dialog "イメージボタン",0 stop

http://hspnext.com/hspkura/hspkura03.htm#contents07のソース。
次から他人に頼る過去ログ遡ったり、ググったりするなり自分の探してた内容を見つけること。



ONION software Copyright 1997-2021(c) All rights reserved.