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


HSPTV!掲示板


未解決 解決 停止 削除要請

2014
0407
T.TFooty2のサイズ変更について教えてください!4解決


T.T

リンク

2014/4/7(Mon) 08:12:20|NO.61436

いつもお世話になってますTEGのT.Tです。

先日、catsさんにウインドウサイズ変更 or 最大化ができるようにしていただきました。
そこに、Footy2を導入したのですが、サイズ変更をしたときに、
Footy2コントロールのサイズを変更するにはどうしたらいいでしょうか?

どうも、画面制御系の処理は苦手で...(^^;

ソースコード...汚い or 作業途中
http://yahoo.jp/box/7lkVyI

よろしくお願いします...



この記事に返信する


掘木

リンク

2014/4/7(Mon) 10:17:47|NO.61438

拝見させていただきました。(Footy2.asが入ってなかったのはcommonに入れてるからかな?)

付属のpdfによると"Footy2Move"を使えばよさそうですよ。
Footy2のことならまず付属pdfを確認してみよう。

Footy2Createの返り値をnFControlIDに入れ、それでFooty2Moveを呼ぶようにしただけですが。
(コードは変更点とその前後、それと微妙に気になった点だけですが・・・)

// Footy2Delete hwnd //え?hwndなの? Footy2Create hWnd,ginfo_cx,ginfo_cy,... //(幅のため省略) nFControlID = stat // 追加 ;メニューバーの高さは環境によって変わります mHwnd=objinfo(stat, 2) // 返り値は多分望みのものではないですよ? // ****** // 〜〜中略〜〜 // ****** *Resize // color 240, 240, 240 : boxf 0, 0, ginfo(12), 32 //現状不要かと。 // MoveWindow mHwnd, 0, 32, ginfo(12), ginfo(13)-32, 0 //え?これの位置変えるの? Footy2Move nFControlID, 0,32, ginfo(12), ginfo(13)-32 //Footy2コントロールのリサイズ return
Footy2Createの返り値を保持しておかないとFooty2のコントロールにアクセスするのに困る気が

*余談
mHwndをなぜかメニューのハンドルだと勘違いしてた。
"起動してすぐ"は新規作成(N)のボタンのハンドルだったorz
;メニューバーの高さは環境によって変わります
というコメントがその上の行にあるから勝手にメニューのハンドルと勘違いorz

ボタンの位置の挙動が不自然だったのは多分このせい。
そして新規作成のコードが末恐ろしい・・・。



T.T

リンク

2014/4/7(Mon) 11:03:20|NO.61440

すみません。まだよくわかりません(^^;
できれば完全修正したものがほしいです。



fortunehill

リンク

2014/4/7(Mon) 13:14:48|NO.61444

/*ご参考*/

#include "Footy2.as" #uselib "user32" #func global SetWindowPos "SetWindowPos" sptr,sptr,sptr,sptr,sptr,sptr,sptr buffer 0 ;SCREEN0をサイズ可変にする処理を手抜き screen 1,ginfo_dispx,ginfo_dispy,,,,640,480 Footy2Create hwnd,0,0,ginfo_winx,ginfo_winy,0 :Foid = stat oncmd gosub *label_1,$5 ;WM_SIZE onexit *label_2 stop *label_1 Footy2move Foot,0,0,ginfo_winx,ginfo_winy ;ツールボックスの配置等必要に応じて調整を行う SetWindowPos hwnd,0,0,0,0,0,3 ;変更の更新 return *label_2 Footy2Delete Foid end



T.T

リンク

2014/4/7(Mon) 16:17:43|NO.61453

有難うございました。
解決しました。

いや〜ソースが腐ってる...(^o^;/

\(^o^)/(ソース)



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