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


HSPTV!掲示板


未解決 解決 停止 削除要請

2015
1002
Mitukingどうやったらタイトルをつまんだときでもアクティブになりますか?5解決


Mituking

リンク

2015/10/2(Fri) 20:59:39|NO.72090

おはこんばんにちは。Mitukingです。 (本人)
題名どおり、
> どうやったらタイトルをつまんだときでもアクティブになりますか?
です。
ソースコードはこちら

screen 0,350,100 repeat redraw 0 color 0,0,0:boxf color 255,255,255 node1= strf("%04d年",gettime(0)) + strf("%02d月",gettime(1)) + strf("%02d日",gettime(3)) node2= strf("%02d時",gettime(4)) + strf("%02d分",gettime(5)) + strf("%02d秒",gettime(6)) yovidata= "日", "月", "火", "水", "木", "金", "土" font "",30 pos 0,0 mes node1 pos 205,0 mes "("+yovidata.gettime(2)+")" title "現在、"+node1+""+yovidata.gettime(2)+""+node2+"" font "",50 pos 0,28 mes node2 wait 0 redraw 1 loop
どうすればいいか、お願いします。



この記事に返信する


b

リンク

2015/10/2(Fri) 21:51:19|NO.72091

> どうやったらタイトルをつまんだときでもアクティブになりますか?
これが常に自分のウインドウを手前にするという意味なら
gsel 0,2を使う



Mituking

リンク

2015/10/2(Fri) 22:04:30|NO.72092

あ、よくいみわからなかったですか、
つまんでも、動くって感じ
HSP3ではつまんだらとまりますから、
とまらないようにっていみです。



Noap

リンク

2015/10/2(Fri) 23:00:21|NO.72093

こまったときのタイマー


#uselib "user32.dll" #func SetTimer "SetTimer" sptr,int,int,int #define WM_TIMER $0113 daydata= "日", "月" , "火", "水" , "木", "金", "土" captioncount=1 screen 0,350,100 SetTimer hwnd,,100 oncmd gosub *timer,WM_TIMER gosub *timer stop *timer redraw 0 date=strf("%04d年%02d月%02d日",gettime(0),gettime(1),gettime(3))+"("+daydata.gettime(2)+")" time=strf("%02d時%02d分%02d秒",gettime(4),gettime(5),gettime(6)) color:boxf color 255,255,255 pos 0,0 : font "",30 mes date font "",50 mes time captioncount-- if captioncount<=0{ title "只今、"+time captioncount=10 } redraw 1 return



Noap

リンク

2015/10/2(Fri) 23:14:40|NO.72094

ウィンドウメッセージは移動中も関係ないのでそれを利用して割り込みさせています。(移動中もWM_MOVINGというウィンドウメッセージを出しています)
C言語の本のサンプルの真似をしました。



Mituking

リンク

2015/10/3(Sat) 00:09:03|NO.72095

ARGTGZMS!!
(ありがとござます!!)



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